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INEDITOS 







Encienda 
una computadora 

Talents® 

y sus perifericos. 


MODEM 

• Interfaz asincronica incorporada. 

• Normas BELL y CCITT, 300 y 
1.200 baudios. 

• Incluye en 80 Kb software 
de comunicaciones 
MSX-PLAN 
y MSX-WRITE. 



RS-232 

• Velocidades programables desde 
50 a 19.200 baudios 

• Procesamiento de 
comunicaciones 
desde Basic. 

• Buffer de 128 
caracteres 
para 

recepcion 



UNIDAD DE DISCOS FLEXIBLES 

• 5 1/4" de360 Kb (DS-DD) 

• Velocidad transference 
250 Kb/sg. 

• Formato grabacion 
compatible 
MS-OOS. 



TECLADO NUMERICO 



» Conexion a Joystick 
► Se integra a todo ef 
software que corre 
bajo MSX-DOS 
(Ej.: D-Base II. 
MSX-Plan. etc.) 


MOUSE 

• Codigo DPM-220, 
accesorio para graficar. 



MONITOR 

MONOCROMATIC0 12” 

• Anti-reflejo - Fosforo verde. 

• Apto para uso profesional. 

• (80 caracteres x 25 lineas). 

• Parlante con amplificador 
incorporado. 


Software 




EXPANSION 80 COLUMNAS 

• Hace posible la utilizacibn de 
software estandar CP/M. 
emulando terminal tipo VT-52. 

• Incluye software para 
maneio de video. 


MSX-LOGO 

Desarrollado por Logo 
Computer System Inc. con 
aplicacion de primitivas y 
redaccion del Manual por 
los Ings. Hilario Fernandez 
Long y Horacio Reggini. 

MSX-LPC 

Lenguaje de 
programacion 
estructurado y 
en castellano. 

MSX-PLAN 

Planilla de calculo 
de Microsoft Corp. 
(Version para MSX 
del Multiplan.) 

MSX-WRITE ^ 

Procesador de 
palabra de ASCII 
Corp. en castellano. 






MINI-LAN 



EQUIPO ALUMNO 


(RED PARA USO EDUCACIONAL) 

• Comunicacion por linea compartida 
a 30.000 baudios. 

• Comparte unidades de disco 

e impresoras de consola MSX maestro 
con hasta 10 consolas MSX alumno 

• Carga simultanea de un programa a 
todos los alumnos. 

• Carga individual de maestro a alumno 

• Salvado de programa alumno a unidad 
de disco maestro. 

• Salida a impresora de maestro del 
listado de programa alumno, en 
spooling. 

• Funciona desde MSX-Basic, 
MSX-Logo o cualquier programa que 
corra desde Basic. 

• Estando activa. se dispone de todo el 

MSX-Basic. 


Talent _ 

Tecnologia y Talertfo 

Producida en San Luis por Telematica S.A. licenciataria exclusiva de Microsoft Corp. y ASCII Corp. para uso de la norma MSX en Argentina. 

6 meses de garantia y mensualmente en su quiosco la revista Load MSX. 

• MSX, MSX-DOS, MSX-PLAN, MS-DOS, son marcas registradas de Microsoft Corporation MSX WRITE es marca registrada de ASCII Corporation. 

• CP/M es marca registrada de Digital Research MSX-LOGO es marca registrada de Logo Computer Systems Inc. Telematica: 1986. Todos los derechos reservados. 
Los datos y especificaciones que figuran en este aviso pueden ser modificados sin previo aviso. 
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LOS ORIGENES 


El Pascal es un lenguaje de 
programacion que fue 
creado para la enscnanza. 
Sin embargo, sus multiples 


dad de perifericos que exis- 
te para su MSX. Mas aun, 
desconocen las aplicacio- 
nes que pueden tener, 
como, por ejemplo, admi- 
nistrar una bascula para 
camiones de 60 toneladas. 
(Pilg. 16) 


bir en “italic”, pasando por 
la decoracion de las caratu- 
las de pantallas. (Pag.24) 


PROGRAMAS 



ventajas lo llevaron a si- 
tuarse entre los favoritos de 
los program adores. Para 
ello fue decisivo el Turbo 
Pascal, que aporto dos ti- 
pos de mejoras: las pala- 
bras clave y los procedi- 
mientos incorporados. 
(Pag.6) 


RINCON DEL 
USUARIO 


No todos los usuarios co- 
nocen realmente la varie- 



Como si fuera 
la galera de un 
mago, nuestra 
computadora 
brinda la opor- 
tunidad de sa- 
carun trucotras 
otro. Desde provocar y 
anular sonidos hasta escri- 


SACANDO 
CONEJOS 
DE LAS 
MSX 


- Explorador de cabezales. 
(Pag.30) 



SECCIONES FIJAS 


Noticias MSX (Pag.4) - 
Soft al dia (Pag.32) - Buzon 
(Pag. 34) 








O T I C I A S 


M S X 


Aplicacion 
medica con MSX 2 


Se trata del primer equipo de electro- 
encefalograffa computarizada basado 
en una “home computer” como es la 
MSX2. 

El mercado de la electromedicina se 
caracterizo siempre, segun informa- 
ron profesionales del medio, por tener 
que recurrir a equipos importados o 
bien nacionales con un alto costo de 
adquisicion y mantenimiento, ade- 
mas de ser basicamente equipos de un 
solo proposito y dedicado. 

Con el adveni- 
miento de la 
computacion 
hogarefia se hi- 
zo patente que 
lamismapodn- 
a prestar una 
gran cantidad 
de servicios en 
esta rama, so- 
bre todo para 
profesionales 
con inquietu- 
des en el campo 
de la electro- 
medicina. 

Con motivo de 
lasXXXJoma- 
das deNeuroci- 
rugfa de la Pro- 
vincia de Bue- 
nos Aires , rea- 
lizadas en Pinamar del 8 al 12 de di- 
ciembre de 1988, Telematica S.A. - 
Talent MSX. y EMAC S.R.L. presen- 
taron el equipo mencionado. A dicho 
congreso concurrieron neurociruja- 
nos de todo el pais y del exterior. 

La Interfase CAD-3 permite presen- 
tar en pantalla las sefiales analogicas 
enviadas por un electroencefalografo 
EMAC EE-3, o bien de otra marca. 
Posibilita almacenar en memoria 10 
minutos de sesion, con 8 canales se- 
parados. 


A medida que se va almacenando la 
information, se puede detener la cap- 
tura de datos y obtener una amplifica- 
cion en tiempo de la sefial almacena- 
da, lo que permite ver con mas detalle 
el electroencefalograma. Por pantalla 
se visualizan 8 segundos simultanea- 
mente con los 8 canales; ademas se 
puede ampliar la sefial para visualizar 
4, 2 y 1 segundos respectivamente. 
El software incorpora las facilidades 
de una pequefia base de datos (fiche- 
ro) que permite guardar los datos del 
paciente, los de la toma y diversos co- 
mentarios que puedan servir como e- 
valuacion del electroencefalograma. 
Por otra parte, el software integra la 
posibilidad de volcado por impresora 
con capacidad de graficos (compati- 


ble MSX o Epson) de toda la sesion o 
de eventos seleccionables por el ope- 
rador, en formato normal o ampliado. 
Ademas, el operador tiene la posibili- 
dad de copiar o descartar partes de la 
toma, lo que pone al alcance del pro- 
fesional la potencia de un procesador 
de textos. Con la metodologia emple- 
ada hasta el momento podria decirse 
que este equipo brinda las facilidades 
de un procesador de texto en un ambi- 
to profesional habituado a trabajar 
con una maquina de escribir. 


Finalmente, se puede realizar un his- 
tograma de todo el registro, asf como 
un completo Analisis de Fourier del 
mismo. 

Durante las Jomadas de Pinamar, el 
Doctor Peter Janetta, de Estados Uni- 
dos, manifesto que ellos poseen un e- 
quipamiento equivalente en su pais 
basado en una Macintosh. Sin embar- 
go, le parecio que este desarrollo fnte- 
gramente nacional es una solucion in- 
teligente para nuestro pais y America 
Latina, donde la escasez de recursos 
para el drea suele detener muchos pro- 
yectos. 

EMAC S.R.L. ofrece la interfase con 
el software y el equipo completo, o se- 
a computadora Talent MSX2 Turbo, 
una unidad de disquete Talent DPF- 


555, un monitor Talent y una impre- 
sora que puede ser Epson o cualquie- 
ra compatible, segun desee el profe- 
sional. 

Este equipamiento demuestra que la 
norma MSX brinda al mercado un sis- 
tema que por su modularidad facilita 
el desarrollo de sistemas de software 
y hardware para mercados verticales 
de gran especializacion, y la Interfase 
CAD-3 es una opcion mas que intere- 
sante para el neurologo. 
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Sin duda Chance ya ha sido consagrado como el juego mas popuiai 
entodoelpals. 

Pero, detras de fodo gran exito hay una muy buena razon. Por eso detras 
de Chance, usted siempre encontrara a El Cronista Comercial. 

Un exito editorial que se escribe con la mas completa informacidn. 

Desarrollaaa a traves de un lenguaje daro y abierto. 

Y con la perspective economica necesaria para comprender mejor 
la actualidad. 

Hoy, quienes juegan con Chance, saben que la mejor informacion 
no es juego. 

El Cronista Comercial 

Su chance de asociarse al exito. 



TURBO PASCAL 


LOS ORIGENES 

El Pascal es un lenguaje de programacion que fue creado para la ensenanza. Sin embargo, sus 
multiples ventajas lo llevaron a situarse entre los favoritos de los programadores. Para ello fue 
decisivo el Turbo Pascal, que aporto dos tipos de mejoras: las palabras clave y los procedimientos 

incorporados. 



P 

I ascalfueinventadoporNiklaus 
Wirth en el comienzo de la decada del 
’70. (Su nombrees en honor de Blaise 
Pascal, un filosofo del siglo XVII). El 
lenguaje de programacion Pascal se 
penso inicialmente para la ensefianza 
-ayudarfa a los programadores princi- 
piantes a desarrollar buenos habitos al 
permitirles escribir program as claros, 
concisos y estructurados. 

Antes del Pascal, lo que aprendfan los 
estudiantes era FORTRAN, un len- 
guaje previo y no estructurado. 

El profesor Wirth creyo que muchos 
errores comunes de programacion 
podian evitarse si se utilizaba un len- 
guaje estructurado en bloques que 
♦ fuera estricto en el tipo de variables 
utilizadas. 

Pascal es un lenguaje de los que en 
ingles se suelen denominar “strongly 
typed”, algo as! como “fuertemente 
tipificado”. Traducido a algo mas 
comprensible, esto significa que las 
variables y constantes de un tipo no 
puede ser mezcladas libremente con 
variables y constantes de cualquier 
otro tipo. En otras palabras, a ambos 
lados de una asignacion se deben 
colocar variables y constantes del 
mismo tipo. La unica excepcion acep- 
tada es asignar a una variable real una 
expresion de tipo entero. La verifica- 
cidn querealizanloscompiladoresde 
Pascal sobre el tipo de variables utili- 
zadas en una expresidn permite evitar 
errores de programacion al forzar al 
programador para que emplee varia- 
bles compatibles. 

En Turbo Pascal, los nombres de 
variables cohsisten en letras o subra- 


yado (_) seguido por letras, digitos o 
subrayados. La longitud maxima de 
un nombre de variable permitido es de 
127 caracteres pero no es muy practi- 
co poner nombres tales como: 
Esta_variable_tiene_por_mision_contar 
pues si tenemos que contar, la senten- 
cia serfa: 

Esta_variable_tiene_por_mision_contar 
:=Esta_variable_tienej)or_mision_contar 
+ l;lo cual permite practicar mecano- 
graffa pero entorpece la programa- 
cion. 

Todos los strings en Turbo Pascal se 
encierran entre comillas simples (‘). 
Esto difiere de lenguajes tales como el 
C o el BASIC donde se utilizan las 
comillas dobles (“). 

Pascal utiliza cinco tipos de datos 
escalares: 


Palabra clave 

char:Un caracter, longitud 1 byte 
byte : Un entero, de un byte de 
longitud cuyo valor va de 0 a 255. 
integer : Un entero con un valor 
de -32768 a 32767. 
real.: Un numero decimal con 1 1 
digitos de precision 
Boolean: TRUE o FALSE (ver- 
dad o falso). 


Aunque a simple vista los tipos byte 
y char parecen ser lo mismo, la verifi- 
cation estricta de tipo que hace Pascal 
impide utilizarlos indiscrim inada- 
mente. Las variables byte se usan 
como numeros enteros pequenos que 
aceleran la ejecucion de un programa, 


Pag. 6 



mientras que las tipo char son simples 
caracteres. Ademas de estos tipos de 
variables, Pascal permite generar 
arreglos de cada tipo escalar. 

Aunque Pascal se desarrollo inicial- 
mente para uso educativo, su facili- 
dad de empleo y enfoque altamente 
estructurado ganaron muchos adep- 
tos que habfan programado en otros 
lenguajes. A medida que Pascal 
comenzo a ser utilizado para el desa- 
rrollo de software comercial, se nece- 
sito extender el lenguaje que, entre 
otras cosas, no provefa de un buen 
manejo de archivos. Antes del Turbo 
Pascal, cada empresa de software que 
desarrollaba un compilador creaba su 
propio conjunto de extensiones, lo 
que dificultaba la portabilidad (esto 
es pasar un programa de una maquina 
a otra, o de una version de un lenguaje 
a otro). Sin embargo, debido a que 
Turbo Pascal se convirtio en el estan- 
dar “de facto”, muchas de las exten- 
siones pueden ser utilizadas libre- 
mente hoy en di'a. 

Respecto a la portabilidad, aquf surge 
una de las posibles aplicaciones, ya 
que hay una version del Turbo Pascal 
en MSX (la 3.01 del CP/M-80) y es 
casi totalmente compatible con la 
existente en IBM PC y compatibles 
(previas a la 4 .0 de PC) . La transferen- 
cia entre una PC y una MSX de un 
programa escrito en Turbo Pascal es 
directa: basta tener en cuenta la exten- 
sidn de la pantalla (80 columnas o 40 
columnas) y recompilar el programa 
fuente (se puede cargar tranquila- 
mente en cualquiera de las dos maqui- 
nas), que el programa en cuestion 
funciona sin problemas una vez reali- 
zado el “transplante”. Otra de las 
ventajas del MSXDOS y van... 

PASCAL COMO 
LENGUAJE 
ESTRUCTURADO 

El lenguaje Pascal es estructurado y 
tiene ciertas similitudes con el Algol y 
el C. La caracteristica distintiva de los 
lenguajes estructurados es su capaci- 


dad de armar bloques separados de 
datos y codigo. Esto significa que 
cada seccion puede trabajar “por las 
suyas”, ocultando toda la informa- 
ci6n del resto del programa para evi- 
tar incomodos efectos secundarios al 
efectuar una tarea especffica. Solo se 
conocen los datos mfnimos entre cada 
compartimiento y no se confunden 
entre sf. Cuando trabajamos en BA- 
SIC, mas de una vez nos encontramos 
pensando si ya utilizamos esta varia- 
ble o vemos como un ciclo termina de 
forma algo extraha y descubrimos 
que el fndice del FOR. .NEXT, por 
ejemplo, quedd modificado en la 
subrutina de la lineal 0000, llamada 
dentro del ciclo. 

Generalmente, la compartamentafi- 
zacion se formaliza a traves de subru- 
tinas, comunmente denominadas 
“subprogramas’I, con “variables loca- 
les”, que son temporarias. De esta 
forma, es posible escribir subrutinas 
que no causen efectos secundarios en 
otras partes de un programa. El uso 
excesivo de las variables globales 
(variables “conocidas” a traves de 
todo el programa) hard que los "bugs" 
trepen por nuestros programas al per- 
mitir la existencia de efectos secunda- 
rios (de por sf, lo mas diffcil de loca- 
lizar cuando “debugueamos”, o sea, 
buscamos errores). En Pascal, todos 
los subprogramas son funciones o 
procedimientos (procedure) discre- 
tos. 

Las funciones y los procedimientos 
son los bloques constructivos de Pas- 
cal. Una tarea especffica dentro de un 
programa puede ser definida y codifi- 
cada en funciones o procedimientos. 
Luego de “debuguear” la funcion o 
procedimiento, un programador 
podra confiar en la misma, ya que 
trabajara adecuadamente y sin efec- 
tos indeseables dentro del programa. 
Todas las variables declaradas en una 
funcion o procedimientos son reco- 
nocidas y admitidas linicamente por 
esa subrutina. 

En Pascal, utilizar bloques de cddigo 
crea lo que se llaman “estructuras de 
programa”. Un “bloque de codigo” es 


un conjunto de sentencias Pascal 
conectadas logicamente que pueden 
ser tratadas como una unidad. Se 
crean colocando lfneas de codigo 
entre las palabras clave “begin” y 
“end”. Por ejemplo, en BASIC escri- 
biriamos: 

100 IF X<10 THEN PRINT “Error. 
Intente de nuevo”:X=-l:GOSUB 
10000 donde 10000 podria ser una 
rutina que utiliza a X como bandera de 
algun proceso. 

En Pascal queda mucho mas visible la 
estructura. 
if x < 10 then begin 
WriteLn(‘Error. Intente de nuevo’); 
Anular(-l); . end; 

En este caso, la misma funcion reali- 
zada en BASIC se obtiene en Pascal 
en forma mucho mas visible y, al 
utilizar una funcion, es innecesario 
tener disponible la variable X para la 
tarea de “mensajero”, ya que se traba- 
ja con una funcion de la misma mane- 
ra que lo hacemos con las funciones 
estandares en BASIC: SIN, SQR, 
etcetera. 

Vemos que el conjunto WriteLn.. 
Anular forma un bloque de programa 
que se ejecuta cuando se cumple la 
condicidn “x < 10” y puede ser pensa- 
do como una unidad -un bloque de co- 
digo. Una sentencia no puede ejecu- 
tarse sin que se invoque la otra. En 
Pascal, cualquier sentencia puede ser 
unica o un bloque de sentencias. El 
uso de los bloques de codigo genera 
programas legibles, con logica facil 
de seguir. Los bloques de codigo 
tambidn permiten escribir programas 
mejores, fibres de errores, porque el 
significado de cada sentencia es claro. 
Esto nos lleva a lo que se conoce 
como programacion estructurada. 

UN POCO DE 
PROGRAMACION 
ESTRUCTURADA 

La forma en que la programacion 
lineal o tradicional nos ensefia a resol- 
ver problemas es tratar de obtener los 
algoritmos de cada procedimiento a 


medida que vamos “creando” el pro- 
grama. Esto nos lleva a estancamos 
quizds en una rutina que muestra un 
mensaje de error y nos impide conti- 
nuar con el programa, sin saber si al 
finalizar el mismo y verlo funcionan- 
do nos parecera mejor utilizar otro 
tipo de algoritmo en una parte deter- 
minada del programa. Los "yanquis" 
denominan esta forma de programa- 
cidn “down-top“ (de abajo hacia arri- 
ba), o sea de lo particular a lo general. 
El enfoque estructurado se conoce 
tambien como “top-down” (de arriba 
hacia abajo), es decir de lo general a 
lo particular. Primero resolvemos el 
problema general, dejando para mas 
adelante (una vez resuelto lo general) 
lo particular, los detalles. Este enfo- 
que nos muestra cada procedimiento 
o conjunto de procedimientos como 
bloques estructurados, que se com- 
portan como cajas negras que sabe- 
mos que hacen tal o cual tarea, pero no 
c6mo la hacen. 

Otra de las “maxim as” de la progra- 
macidn estructurada es la abolicion 
del GOTO. Nosotros, los curtidos 
programadores BASIC y Assembler, 
no podemos imaginamos a veces qu6 
seria la vida sin un GOTO Salvador, 
pero... a veces los diagram as lineales 
de un programa quedan como la 
Avenida Libertador de nuestra Capi- 
tal a las seis de la tarde: un nudo 
descomunal. 

£C6mo reemplazamos los GOTO? 
Muy fdcil, con estructuras de control: 
FOR. .NEXT, WHILE, REPEAT 
UNTIL, etcetera. 

Todo esto nos lleva nuevamente al 
Pascal: si sumamos la posibilidad de 
utilizar subprogramas“estancos” .es- 
tructuras de control que permiten 
obviar los GOTO y una forma de 
encarar la programacidn del tipo es- 
tructurado, nos encontraremos pro- 
gram ando mucho mds eficientemen- 
te, y, aunque no lo parezca, con mu- 
cha mds rapidez. 

Un programador Turbo Pascal puede 
crear y mantener una biblioteca per- 
sonal de funciones que se ajusten a su 
personalidad. Ya que Turbo Pascal 
permite incluir distintos archivos- 


fuente dentro de un programa, los 
proyectos grandes se pueden manejar 
muy facilmente. 

A medida que el Pascal se fue hacien- 
do mds popular, muchos programa- 
dores comenzaxon a utilizarlo en 
cualquier tarea (de programacion, no 
les servia mucho para afeitarse, por 
ejemplo...). Ya que hay virtualmente 
al menos un compilador Pascal por 
cada computadora conocida (;inclu- 
yendo la venerable TI99/4A!), se 
puede tomar un programa escrito en 
una maquina, compilarlo y correrlo 
en otra con pocos cambios, o ninguno. 
Esto ahorra mucho tiempo y dinero. 
Veamos ahora que nos trae el Turbo 
Pascal para los usuarios MSX. 

MEJORAS 
1NCORPORAPAS 
AL TURBO PASCAL 

En esta description sobre las mejoras 
del Turbo Pascal, presuponemos que 
el lector esta familiarizado con el 
lenguaje y que conoce la version 
estandar y sus limitaciones. Al que no 
lo conozca, igualmente le resultaran 
interesantes algunas consideraciones 
que se aplican a las generales de la 
programacidn. 

La decision de mejorar un lenguaje 
debe basarse en una buena razon. 
Cada extensidn que se incorpore dis- 
minuye “per se” la portabilidad de los 
programas que la utilicen. Por otra 
parte, las extensiones hacen al len- 
guaje no estdndar. Usualmente las 
extensiones se agregan porque la 
versidn estandar del mismo carece de 
alguna funcidn necesaria. En cuanto 
al Pascal estandar, las carencias que 
se observan son la falta de manejo de 
strings, direccionamiento absoluto, y 
manejo de overlays. Recordemos que 
el Pascal se cred como lenguaje de 
ensefianza y Borland, los creadores 
del Turbo Pascal, lo convirtieron en 
un lenguaje de propdsito general, 
apto para el programador profesional . 
Las mejoras introducidas por Borland 
caen en dos categorias: sentencias del 
lenguaje (palabras clave) y procedi- 


mientos incorporados. Veamos pri- 
mero las sentencias. 

a) Absolute 

La primera mejora sustancial que 
encontramos en el Turbo Pascal es el 
modificador “absolute”. El Pascal 
estandar no permite fijar un lugar de 
memoria determinado para una varia- 
ble dada. Esta posibilidad era innece- 
saria en el area de aprendizaje de la 
programacion, sin embargo, cuando 
se desarrollo software comercial o 
profesional, fue esencial. 

Por ejemplo, supongamos que quere- 
mos modificar algun valor de la work- 
area del MSX mas alia de la posicion 
&HF380, digamos el que cuenta la 
cantidad de lineas de la pantalla (ver 
el truco que permite reservar unas 
h'neas de la parte final de la misma). 
En este caso, bastard con definir una 
variable de la siguiente forma: 
lineas: byte absolute $F3B 1 
y luego, para poner 4 lineas reserva- 
das, serd suficiente con hacer la si- 
guiente asignacion: 
lineas:=20; 

Un ejemplo de aplicacion de lo ante- 
rior es el siguiente programa: 
program Lineas; 

(* 

Este programa usa la variable del 
sistema 

CRTCNT para reservar las ultimas 
lineas 

aprovechando el ‘absolute’ 

*) 

var 

CrtCnt: byte absolute $F3B1; 

i: byte; 
begin 

ClrScr; 

GotoXY(l,23); 

Write(‘Linea 24 

— ’); 

GotoXY(l,21); 

Write(‘Linea 22 

— ’); 

CrtCnt:=20; 

GotoXY(l.l); 

for i:=l to 100 do 
WriteLn(‘i=’,i:3); 




CrtCnt:=24; 

end. 

Notese como se indican las variables 
en hexadecimal en Turbo Pascal. 
Siempre hay que recordar que el uso 
de variables absolutas debe hacerse 
con sumo cuidado para evitar que el 
sistema operativo y el programa cho- 
quen y “cuelguen” la computadora. 
Tambien se puede utilizar la senten- 
cia absolute para hacer que dos varia- 
bles compartan el mismo lugar de 
memoria. El siguiente ejemplo hace 
que las variables ‘suma’ y ‘sigue’ 
compartan la misma area: 


suma : integer 

sigue: integer absolute suma; 


b) External 

Con el Pascal estandar no es posible 
utilizar funciones o procedimientos 
que no esten escritos en Pascal. Sin 
embargo, hay muchas ocasiones en 
que es necesario que esto sea posible. 
Por ejemplo, si tenemos que controlar 
una interfase robotica que requiera 
alta velocidad de ejecucion, lo mas 
probable es que haya una rutina en 
codigo maquina que permita manejar 
el dispositivo. 

En el Turbo Pascal para MSX, se 
permite declarar una subrutina escrita 
en codigo maquina a traves de su 
direccion de memoria absoluta. Su- 
pongamos que utilizamos la clasica 
posicion SD000 para almacenar nues- 
tra rutina en Assembler. En este caso, 
la llamada a una supuesta rutina que 
maneje un interruptor seria: 

procedure Enciende(cual: integer); 
external SD000 

El modificador ‘external’ le informa 
al Turbo Pascal que una rutina en 
Assembler sera utilizada y en que 
posicion de memoria reside. 

Se debe declarar un subprograma 
externo sin el cuerpo en nuestro pro- 
grama Pascal; solo es necesario espe- 
cificar los parametros del subprogra- 
ma. 


El problema que tiene external es que 
antes deberemos ‘pokear’ el subpro- 
grama en codigo maquina de alguna 
forma y analizar en que posicion de 
memoria lo colocamos para que no 
interfiera con el sistema operativo. 
La forma en que se le pasan los para- 
metros a una rutina external en Turbo 
Pascal esta mas alia de esta nota, pero 
podri'amos mas adelante realizar 
algun ejemplo de aplicacion. Para 
poder utilizar esta facilidad se debe 
conocer el lenguaje Assembler y la 
arquitectura de las MSX. 

c) Inline 

El Turbo Pascal permite insertar codi- 
go maquina directamente en nuestro 
programa Pascal utilizando inline. 
Esta facilidad puede ser muy util para 


realizar interfases con dispositivos 
especiales y escribir rutinas rapidas 
que empleen las facilidades del Turbo 
Pascal. 

El codigo de maquina que se desea 
insertar en el programa se incluye a 
continuac ion de la palabra clave inli- 
ne entre parentesis. Cada byte o pala- 
bra se separa con la barra transversal 
(/). Se pueden utilizar los signos mas 
(+) y menos (-) para sumar o restar. 
Un asterisco especifica una referen- 
da al contador de posicion dentro del 
programa Assembler. Como inline es 
una sentencia, termina con punto y 
coma (;). El siguiente ejemplo es una 
rutina que pasa a mayusculas el string 
que se le envia. Al lado de los codigos 
se coloco como comentario el codigo 
fuente. 



program Pinline; 

(* 

Este programa utiliza la extension'inline’ 
del Turbo Pascal para crear un procedimiento 
que pasa a mayusculas un string 
*) 

type 

Str = string [255]; 
var 

Alfa : Str; 

procedure Mayusculas(var Strg: Str); 

$A+ 

begin 

inline ($2A/Strg/ { LD HL,(Strg) } 


$46/ 

{ 

LD B,(HL) 

} 

$04/ 

{ 

INC B 

} 

$05/ 

{ 

LI: DEC B 

} 

$CA/*+20/ 

{ 

JPZ,L2 

} 

$23/ 

{ 

INCHL 

} 

$7E/ 

{ 

LD A,(HL) 

} 

$FE/$61/ 

{ 

CP ‘a’ 

} 

$DA/*-9/ 

{ 

JP C,L1 

} 

$FE/$7B/ 

{ 

CP ‘z’+l 

} 

$D2/*-14/ 

{ 

JP NCU1 

} 

$D6/$20/ 

{ 

SUB20H 

} 

$77/ 

{ 

LD (HL),A 

} 

$C3/*-20); 

{ 

JP LI 

} 


{L2: EQU $ } 


end; 

begin 

Write(‘Ingrese el string:’); 
ReadLn(alfa); 
Mayusculas(alfa); 
WriteLn(alfa); 
end. 


d) Overlay 

Una de las mejoras mas importantes 
en el Turbo Pascal es la posibilidad 
del manejo de overlay. Este comando 
permite crear programas que son 
mayores que la capacidad de memo- 
ria de la maquina. Esto se hace au- 
tomaticamente cargando subprogra- 
mas, llamados overlays, que se alma- 


cenan en disco hasta 
que se necesiten para 
la ejecucion del pro- 
grama. 

Generalmente, para 
crear un overlay, se 
pone ‘overlay’ al 
principio de la fun- 
cion o "procedure" 
que se quiera usar. 
Cuando el Turbo Pas- 
cal encuentra el co- 
mando ‘overlay’, au- 
tomaticamente com- 
pila ese subprograma 
en un archivo separa- 
do. Vease en el ma- 
nual del Turbo Pascal 
la implementacion de 
los overlays en este 
lenguaje. 

e) shr y shl 

Shr viene de ‘shift 
right’ y shl de ‘shift 
left’. Estas operacio- 
nes pueden utilizarse 
solo con variables del 
tipo "integer". Basi- 
camente cumplen la 
misma funcion que 
los comandos de 
‘shifteo’ que tiene el 
Z-80 con relation a 
los bytes. 

f) String 

Cuando utilizamos el 
Pascal estandar real- 
mente no es muy facil 
usar los strings como 
en, por ejemplo, el 
MSX BASIC. El Tur- 
bo Pascal agrega el tipo string, con 
funciones que permiten manipularlos 
con la misma facilidad que en BA- 
SIC. En oposicion a los arreglos de 
caracteres, que deben tener una longi- 
tud fija, los string tienen longitud 
variable, que puede ir de 1 a la canti- 
dad maxima especificada en la decla- 
ration de la variable (maximo 255 
caracteres). 


g) XOR 

Turbo Pascal tambien agrega el ope- 
rador XOR aplicable tanto a operan- 
dos del tipo "integer" como a los del 
tipo Boolean. Para los operandos" 
integer", se realiza la operacion XOR 
entre los bits de cada "integer". Para 
los operandos Boolean, se obtiene 
TRUE o FALSE de acuerdo al resul- 
tado de la operacion. 

PROCEDIM1ENTOS 

INCORPORADOS 

Turbo Pascal incorpora un buen pa- 
quete de procedimientos que facilitan 
en gran medida la programacion. Se 
pueden dividir en tres categorias: 
manejo de pantalla, strings y manejo 
del sistema operativo. 

a) Procedimientos para manejo de 
pantalla 

Estos son algunos de los procedi- 
mientos incorporados al Turbo Pas- 
cal: 


Procedimiento 

Efecto 

CrtEol 

Borra hasta el fin 
de la linea 

CrtExit 

Envia un string 
de reset a la pantalla 

Crtlnit 

Envfa un string de 
inicio a la pantalla 

ClrScr 

Borra pantalla 

DelLine 

Borra una linea 

GotoXY 

Equivale al LOCA 
TE del BASIC 

InsLine 

Inserta una linea en 
bianco. 


b) Funciones para strings 

Como quedo dicho anteriormente, el 
Turbo Pascal incorpora el tipo 
‘string’ y funciones para manejarlos. 
Algunos de estos procedimientos 
son: 
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Procedimiento 

Efecto 

Delete 


Borra una parte 
de un string, 
dada la posicion 
inicial y la 
cantidadde 
caracteres. 

Insert 

Inserta un string 


dentro de otro 

Str 

Convierte un inte- 


ger o real a string 

Val 

Convierte un string 


a real o integer 


Las siguientes funciones tambien 
soportan los strings: 


Funcion 

Efecto 

Copy 

Retoma un substring, 
copia de un string 

Concat 

Retoma un string que 
es el resultado de la 
concatenacion de 
dos strings 

Length 

Equivale al LEN de 
BASIC 

Pos 

Equivale al INSTR de 
BASIC 


c) Procedimientos para interfase 
con el sistema operativo 

Turbo Pascal permite acceder al sis- 
tema operativo a traves de dos proce- 


dimientos especiales: Bdos y Bios. 
En general, para que todo funcione 
correctamente en MSXDOS, debere- 
mos utilizar el procedimiento Bdos, 
pues el Bios emplea parte del CP/M 
que es incompatible con el 
MSXDOS. 

D1FERENCIAS ENTRE EL 
TURBO PASCAL Y EL 
PASCAL ESTANDAR 

Aparte de las extensiones y mejoras 
incluidas por el Turbo Pascal, presen- 
ta algunas diferencias con el estandar. 
Los programadores experimentados 
de Pascal que desean utilizar el MSX 
con el Turbo deberan tenerlas en 
cuenta para evitar problemas. 

a) El procedimiento ‘new’, que per- 
mite alojar variables dinamicas para 
utilizar con punteros, no acepla espe- 
cificar un registro variante. Si se ne- 
cesita trabajar con ellos, se debera 
utilizar el procedimiento ‘getmem’. 

b) No se permite que un ‘goto’ salte 
fuera del bloque que se especifica. 
Esto implica que tanto el ‘goto’ como 
la etiqueta a donde se salta deben estar 
en el mismo bloque. (Pero si usamos 
programacidn estructurada, esto no es 
ningun problema... pues jnuestros 
programas no tienen ‘goto’!) 

c) No podremos utilizar parametros 
tipo ‘var’ en rutinas recursivas (en la 
version de PC esto esta permitido). 

d) No estan implementadas ‘get’ ni 



‘put’; se debe usar ‘readry ‘write’ que 
fueron extendidas para su utilization 
con disquete. 

e) Se puede utilizar la palabra clave 
‘packed’, pero no tiene efecto. 
Asimismo.’pack’ y ‘unpack’ no fue- 
ron implementados. 

f) El procedimiento ‘page’ no esta 
implementado. 

CONCLUSIONES 

El MSXDOS permite acceder a la 
gran biblioteca de programas existen- 
te para CP/M-80, incluyendo famo- 
sos lenguajes como el Turbo Pascal. 
Viendo tanto su facilidad de uso como 
sus extensiones, es facil ver como se 
convirtio en un estandar ‘de facto’ de 
los compiladores Pascal y como se ha 
extendido su uso a nivel profesional. 
(Como chimento final, diremos que la 
linea ‘Agropack’ -sistemas deaplica- 
cion para el agro que comercializa 
Telematica S.A.- fue desarrollada en 
Turbo Pascal). 

Hugo Daniel Caro 
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COMPUTO Y 
PRESUPUESTO 



Tipo:Utilitario 

Autor:Arq.Eduardo G.Armanino 


E ste programa es un utilitario des- 
tinado a arquitectos, ingenieros, 
constructores, etcetera que permite 
realizar el computo metrico y el pre- 
supuesto de una construction a partir 
de cada una de sus partes, aunque con 
leves variantes podria ser utilizado 
por otras disciplinas. 

Este programa esta dividido en dos 
partes, una la correspondiente al 
computo y la otra al presupuesto. En 
la primera se ingresan los datos co- 
rrespondientes a cada uno de los 
items, es decir las dimensiones, y la 
computadora nos imprimira el volu- 
men o la superficie de los mismos, 
segun lo que corresponda. En la se- 
gunda se ingresan los precios parcia- 
les y totales. Esta division permite 
que pueda realizarse, si asi se desea, 
solamente el computo. 

El manejo del programa es sencillo ya 
que en el menu aparecen las distintas 
operaciones posibles, y a medida que 
se va ejecutando se visualizan las 
instrucciones para ir continuando 
con el mismo. 

La estructura general esta marcada 
por esa division entre las dos partes, si 
bien en algunos sectores se mezclan 
las rutinas. Esto es debido a dos moti- 
vos: l fi ) a que surgio como un progra- 
ma simple, y luego se le fueron agre- 
gando mas operaciones y 2 9 ) a que 
con la finalidad de aprovechar al 
maximo las rutina que se repiten en 
las distintas operaciones, hay bastan- 
te cantidad de ‘gosub’ y ‘goto’. 

INSTRUCCIONES: 
Computo y presupuesto 

Primeramente aparece en pantalla la 


presen tac ion. En este punto se dcbe 
esperar unos instantes, ya que aqui se 
realizan los pokes correspondientes a 
las lecturas de la pantallas, se dimen- 
sionan las matrices, se redefinen los 
caracteres ‘S’ y *?’, y secolocaun 0 a 
partir de la direccion 60000! hasta la 
direccidn 61 100!. Esto ultimo es ne- 
cesario debido a que las variables 
alfanumericas no se ingresan ni se 
imprimen en pantalla como tales, sino 
que se van almacenando a partir de la 
direccion 60000! letra por letra, por 
su codigo ASCII. Esto permite ingre- 
sar todos los subitems que necesite- 
mos sin alterar la memoria disponible 
para cadena de caracteres. Se pueden 
ingresar hasta diez subitems de seis 
caracteres cada uno, por cada uno de 
los dieciocho items. Esta cantidad de 
items puede ser variada,deacuerdo a 
las necesidades de cada uno teniendo 
las siguientes precauciones: 1°) di- 
mensionar las matrices en la linea 200 
reemplazando el N e 18 por el que 
corresponda, 2°) cambiar el bucle de 
la linea 210 con el valor que corres- 
ponda y 3 9 ) cambiar el bucle de la 
linea 500 con el mismo valor y agre- 


gar 0 eliminar los datos de las lineas 
510 y 520. Se debe tener la precau- 
tion de no agregar demasiada canti- 
dad de items ya que se puede agotar la 
memoria disponible. 

Luego de la presentation se inicia con 
el computo metrico. Oprimiendo 
cualquier tecla se visualiza el menu. 
Oprimiendo la letra ‘K’ se inicia des- 
de el item 0. En cada item se pueden 
ingresar hasta diez subitems de seis 
caracteres cada uno. Estos pueden ser 
mayusculas o minusculas o numeros. 
Si algun subitem tuviera menos de 
seis caracteres, los faltantes se deben 
completar con espacios. Una vez 
ingresados los seis caracteres se pasa 
directamente a ingresar las dimensio- 
nes, sin oprimir ‘enter’. El oprimir 
‘enter’ mientras estamos ingresando 
el nombre de algun subitem ocasio- 
nara que borre el mismo y nos permita 
realizar correcciones en caso de haber 
ingresado un dato erroneo, tambien 
nos permite pasar al item siguiente 0 
abandonar el computo. 

Para cada subitem se pueden ingresar 
hasta tres dimesiones: largo, ancho y 
alto. Si fuera un subitem que no tiene 



dimension sino que se mide por uni- 
dades se debe colocar la cantidad de 
las mismas en laprimera dimension y 
0 en las otras dos. Una vez ingreadas 
las dimensiones de un subitem la 
computadora imprimira la superficie, 
volumen, unidades del mismo, segun 
lo que corresponda. 

La primer dimension de un subitem 
siempre debe ser mayor que cero, ya 
que de lo contrario ocurre lo mismo 
que al oprimir ‘enter’ mientras ingre- 
sabamos el nombre del subitem. 

En el caso de que un item tenga 
menos de diez subitems, una vez in- 
gresado el ultimo necesario, se opri- 
men las teclas ‘graph’ + ‘p’ y se pasa 
automaticamente al item siguiente. 
Una vez finalizado el compute metri- 
co se pueden visualizar en el menu las 
distintas operaciones que se pueden 
realizar, y que son las siguientes: 

1) Listar los nombres de los items. 
Oprimiendo ‘L’ aparecera toda la lis- 
ta. 

2) Listar un item. Oprimiendo ‘I’ 
aparecera el item correspondiente 
con todos los dates ingresados hasta 
el momento. 

3) Modificar un item. Oprimiendo 
‘A’ se podra agregar o quitar cual- 
quier subitem. Primero la computa- 
dora preguntara si se desea agregar o 
quitar, debiendose ingresar ‘a’ o ‘d’ 
segun el caso. Luego preguntara a que 
item corresponde la modificacion y lo 
listara, preguntando por el subitem a 
agregar o quitar. En el caso de que 
algun subitem ya existente se desee 
modificar parcialmente, primero se 
debe anular y luego se debe agregar 
nuevamente. 

4) Realizar otro compute. Oprimir 
‘O’. 

5) Finalizar. Oprimir ‘F’. 

6) Pasar al presupuesto. OprimirT’. 
En el presupuesto se inicia de forma 
similar al compute, apareciendo pri- 
meramente todas las opciones dispo- 
nibles. 

Oprimiendo ‘K’ se comienza con el 


primer item. Se visualizaran en la 
pantalla todos los subitems corres- 
pondientes con sus correspondientes 
superficies, volumenes o unidades, 
segun corresponda. La visualization 
de los subitems se ira haciendo uno 
por uno, debiendos ingresar el precio 
uni tario de cada uno y la computadora 
imprimira el precio parcial. As! se 
debe realizar con todos los subitems 
hasta llegar al ultimo. Si algun item 
tiene menos de diez subitems basta 
con oprimir ‘graph’ + ‘p’ y se impri- 
mira en la pantalla el precio total del 
item y se pasara al siguiente. 

Una vez finalizado el presupuesto 
ocurre lo mismo que con el compute, 
es decir que aparecen todas las opcio- 
nes. 

Una vez realizado el presupuesto 
cualquier modificacion de algun item 
que se quiera realizar, se debera hacer 
tanto en el compute como en el presu- 
puesto, tarea que la computadora nos 
indicara automaticamente. 

Para listar un item , igual que en el caso 
anterior, el listado se realizara del 
item indicado en el compute y en el 
presupuesto. 

En el caso de modificar algun item, ya 
sea agregando o quitando algun subi- 
tem, se modificara automaticamente 
el precio total del item, imprimiendo- 
se el mismo en la pantalla. Tambien se 
modificara en este caso el precio total 
de la obra. 

En el presupuesto tambien tenemos la 
opcion ‘C’ que nos permite visualizar 
en pantalla el nombre de todos los 
item con sus correspondientes precios 
y el porcentaje que le corresponde a 
cada uno en el total de la obra y se 
imprimira en la parte inferior de la 
pantalla el costo total de la misma. 

ESTRUCTURA 

DELPROGRAMA: 

10-240: Preparacion: dimensiona- 
miento de vectores y matrices, re- 


definition de caracteres, pokes. 
250-390:Preparacion compute me- 
trico. 

400-490:Elecci6n de opciones. 
500-540:Lista de items. 
550-1040:Iniciodecdmputometrico. 
1050- 1410: Modificacion de item: 
agregar o eliminar subitem. 
1420-1710:Lista un item complete 
(compute solamente). 
1720-1810:Preparacion presupuesto. 
1820-1910:Eleccion de opciones. 
1920-2280:Inicio de presupuesto. 
2290-2420: Costo total de la obra. 
2430-2650:Modificaci6n de item 
(compute y presupuesto). 
2660-2840:Listadeun item complete 
(con presupuesto). 
2850-3030:Rutinas que se repiten en 
varias operaciones. 

LISTA DE 

VARIABLES: 

I = N a de item. 

G = N e de subitem. 

VC = Codigo ASCII del caracter in- 
gresado. 

NN = Direction de memoria donde 
se almacena VC. 

PE = Peek de una direction de memo- 
ria. 

CA (I,G) = Dimension a de un subi- 
tem. 

CB(I,G) = ‘’b " ‘’‘’ 

CC (I,G) =” c *’ 

continua la lista de variables de 

Compute y Presupuesto. 

VD (I,G) = Volumen, superficie o 
cantidad de un subitem. 

PP (I,G) = Precio unitario de un subi- 
tem. 

V (I,G) = Precio total de un subitem. 
PIT (I) = Precio total de un item. 
FIN = Precio total de la obra 
M = Position para imprimir en panta- 
lla. 

B$ (I) = Nombre de un Item. 

Z$ = Opcion elegida. 


0 'computo y presupuesto 
2 '1989 eduardo g. armanino 
5 'preparacion 

i 0 KEYOFF : SCREENO : W I DTH40 : VDP < 7 ) 
=49 

20 CLEAR200 

30 CLS : E*= "»»»»»»»»»»< 
<<<<<<<<<<<<<<<<<<": PRINTE*:L0CA 
TEO, 21 SPRINTED 

40 LOCATE 10, 10: PR I NT " un minuto p 
or favor " 

50 PRINT : PRINT : PR I NT "C 0 M P U T 
0 y PRESUPUEST 0“ 

60 T=BASE ( 2 ) +8*63 : F0RH=TT0T+7 
70 RE AD A : VPOKEH , A : NE X T 
80 T=BASE < 2 > +8*36 : F0RH=TT0T+7 
90 READA 

100 VPOKEH, A -.NEXT 

1 1 0 DATA 128,192, 224 , 240 , 240 , 224 , 

192,128,32,32,112,248,80,248,136 

1 Q 

120 'lectura de pantallas 
1 30 DEFUSR8=5 1 770 ! : DEFUSR9=5 1810 


140 F0RR=5 1 750 ! T05 1839! 

150 READD: POKER, D:NEXTR 
1 60 DAT A64 ,68,72,76,80,84,88,92, 
96 , 100 ,104,108,112,116,120,124,0 
, 0 , 0,0 

170 DATA1 ,12,0,33,0,0,62,32,205, 

86.0. 33.38.202.58.248.247.133.11 

1.30.0. 86.33.0.0.1.192 

180 DATA3, 62, 84, 211 ,168,205,89,0 
,62,80,211 , 168,201 ,33,38,202,58, 

248.247.133.111. 126.103.46.0. 17, 
0,0,1, 192,3,62,84,211 , 168,205,92 
,0,62,80,211,168,201 

1 90 FOR I =60000 ! T06 1 1 00 ! : POKE 1,0: 
NEXT 

200 D I MB* (18) , V ( 1 8 , 1 0 ) , C A (18, 10) 
, CB <18,10) ,PIT (18) , CC (18,10) ,VD< 
18,10) , PP (18,10) , PO < 18) 

210 F0RI=0T017: READS* < I ) z NEXT 
220 C*="descrip. a b 

c v” 

230 D*="presione cualquier tec la 
para continuar " 

240 W*=" 

" : U=16: CLS 


250 

L0CATE3 

,5: PRINT" 

**•* 

** * 

* 

*** 

* 

* *** ** 

* 

* 

* ** 

** 

* * * 

* * 

* * 


* 

* 

* * * * 

*** 

* * * 

* 

*" 





260 

L0CATE3 

,8: PRINT" 

* 

* * * 

* 

* 

* 

* * * 

* 

*** 

** * 

* 

* ** 

* 

**" 


270 LOC ATEO ,16: PR I NTD* 
280 I F I NKE Y*= " " THEN280 
290 CLS: A*=" — 


"SPRINT 

300 PRINT"li E N U" : PRINTA* 

310 PR I NT "K comienza" sPRINT 

320 F’RINT"L lista i terns" : PRINT 
330 PRINT" A agrega o desagrega 


item" sPRINT 

340 PRINT" I lista un item":PRI 
NT 

350 PR I NT "F final i 2 a" sPRINT 

360 PR I NT "0 otro c"mputo" : PRIN 

T 


370 PRINT "P presupuesta" : PRINT 

380 PR I NT "C . costo total y pore 
entajes” 

390 LOC ATEO , 22 : PR I NTE* : EC=USR8 < 0 
) 

400 Z*= : INKEY*: IFZ*=" "THEN400 
410 I F Z *= " K " THEN500 


420 IFZ*=" I "THEN1430 
430 I F Z *= " L " THEN500 
440 IFZ*="P"THEN1730 
450 I F Z*= " A " THEN 1 060 


460 IFZ*="0"THEN20 

470 IFZ*= " F " THENEND 

480 IFZ*="M"THENLEC=USR9<0) 

490 G0T0400 

500 CLS: F0RI=0T017: PRINTS* (I) : NE 
XT 

510 DATAO derechos y honorarios 
,1 trabajos prel iminares ,2 mam 
poster i a, 3 hormigon y 1 osas cer 
am. ,4 ai si aciones,5 cubiertas, 
6 revoques,7 cielorrasos 
520 DATA 8 contrapi sos,9 pisos 
y zocalos ,10 revesti mi entos , 1 1 c 
arpi nter i a , 12 inst. sanitarias,l 
3 inst. gas, 14 inst. electricas, 
15 pintura,16 vidrios,17 varios 
530 I F Z *= " K " THEN550 
540 GOTO 1570 

550 LOCATEO, 20:PRINTD*,E* 

560 I F I NKEY*= " " THEN560 
570 FOR I =0T0 1 7 : GOSUB 1 690 
580 G0SUB2950 
590 F0R6=0T09 
600 'escribir subitem 
610 LOCATEO , U: PR I NTD* 

620 K *= I NKE Y* : I FK*= " " THEN620 
630 LOC ATEO, U : PR I NT W* 

640 IFK*=CHR* (230) THENGOSUB 1 020 : 
G0T0610 

650 IFK*=CHR* ( 148) THENLC=USR9 (0) 
•.GOTO 400 

660 IFK*=CHR*(219)THEN9B0 

670 VPOKEM , G+48 

680 M=M+1: BEEP: VPOKEM, 63 

690 FORD=lT06: M=M+1 : VPOKEM, 2 19 

700 V*= INKEY*: I FV*= " " THEN700 

710 I F V*=CHR* (219) THEN960 

720 IFV*< >CHR* (13) THEN750 

730 M=M~D- I : F0RW= 1 T06 : VPOKE W+M , 0 

: NEXT 

740 F0RW=NN- < D-2 ) TONN : POKE W , 0 : NE 
XT : LOCATEO, G+5: PRINTW*: GOTO 610 
750 VC= ASC ( V* ) : VPOKEM , VC 
760 G0SUB3020 : POKENN , VC : BEEP : NE X 
TD : VPOKEM- 6 , 0 

770 LOCATE 10, G+5 : BEEP : INPUTCAd, 
G) 

780 LOCATE 10, G+5: PRINTSPC <9) 

790 LOCATE 1 0 , G+5 : PR I NTUS I NG " ### . 
##" 5 CA < I ,G) 

800 I FCA < I , G ) =0THEN 1 550 
810 'ingreso b 

820 LOCATE 17, G+5 : BEEP : I NPUTCB < I , 
6 ) 

830 LOC ATE 17, G+5: PRINTSPC (9) 

840 LOCATE 1 7 , G+5 : PR I NTUS ING"#### 
# . ##" 5 CB ( I , G) 

850 IFCBd ,G).=OTHENVD(I ,G)?CAU , 
G) : GOTO 930 
860 'ingreso c 

870 L0CATE25 , G+5 : BEEP : I NPUTCC ( I , 
G) 

880 L0CATE25 ,G+5: PRINTSPC ( 10) 

890 L0CATE25, G+5: PRINTUSING"#### 
#.##"5 CCd ,G) 

900 IFCC (I ,G) =0THENVD (I ,G) =CA < I , 
G) *CB ( I , G) : GOTO 930 
910 'v subitem 

920 VD < I ,G) =CA ( I ,G) *CB < I ,G) *CC < I 

,< 3 ) 

930 L0CATE33, G+5: PRINTUSING"#### 
. ##" ; VD (I ,G) 

940 M=M+33 

950 IFZ*="A ,, THENU=16: GOTO 1570 
960 NEXTG 

970 I F I NKEY*= " " THEN970 
980 BEEP: NEXT I 
990* IFINKEY*=""THEN990 
1 000 BEEP : LC=USR9 ( 0 ) : G0T0400 
1010 ‘escrit pantalla actual 
1020 EC=USR 8 ( 1 ) : LC=USR9 <0) 

1030 F0RJ=1T01500: NEXT : LC=USR9 < 1 


) : RETURN 

1040 GOTO 400 

1050 'mqdif item 

1060 CLS : PR I NT A* : U= 1 8 

1070 BEEP: INPUT "agrega o desagre 

ga <a/d)" 5 AGS 

1080 IFAG*="a"THENBG*="agregar " : 
GOTO 1110 

1 090 I FAG*= " d " THENBG*= " desagr ega 
r":G0T0 1110 
1100 CLS: GOTO 1070 
1110 PRINT: BEEP: PRINT" i ngrese el 
n#mero de item a modi f icar ": INP 
UTI 

1120 I F I > 1 7THEN 1 060ELSECLS sPRINT 
: PRINTS* (I) : PRINTA*; 

1130 PRINTC* , A* 

1140 M=200 

1150 F0RG=0T09 

1160 VPOKEM, G+48 

1 1 70 FORD= 1 T06 : G0SUB3030 

1180 I FPE=0THEN 1210 

1190 VPOKEM+D+1 , PE: NEXT 

1200 GOSUB 1640 

1210 M=M+40: NEXTG 

1220 LOCATEO, 15: PRINT A * 5 

1 230 BEEP : LOCATEO , 20 : PR I NT " i ngr e 

se n#mero de subitem a " ;BG*:BEE 

P: INPUTG 

1 240 I FG >9THENLDCATE0 , 20 : PR I NT W* 
: GOTO 1230 

1 250 I FG >9THEN 1 230ELSEMG=G , 

1260 I FAG*= " d " THEN 1310 
1270 'agregar subitem 
1280 LOCATEO , 20 : PR I NTW* , E* 

1290 M= (G+5) *40: G0T0610 
1300 'desagregar subitem 
1310 L0CATE0,20:PRINTW*,E* 

1320 F0RD=1T06 

1330 G0SUB3020: POKENN, O: BEEP 
1340 NEXTD 

1350 CA ( I ,G) =0: CB ( I ,G) =0: CC (1,6) 
-0: VD d ,G) =0 

1 360 LOCATEO , 1 6 : PR I NTD* : LOCATE 1 , 
G+5: PRINTW* ' 

1370 I F I NKE Y*= " " THEN i 370 

1380 IFPR< 1THENCLS: LC=USR9 (O) : GO 

TO 400 

1390 PIT (I ) =P I T ( I ) —V (I , G ) :FI N=F I 
N~V(I,G) 

1400 IFINKEY*=" "THEN1400 
1410 GOTO 2670 
1420 'lista un item 
1430 CLS 

1440 PRINTsBEEP: INPUT"que item q 
ui ere 1 i star " ; I / 

1450 I F I > 1 7THEN 1 430ELSEM=200 
1460 GOSUB 1690 
1470 F0RG=0T09: VPOKEM, G+48 
1480 FORD= 1 T06 : GOSUB3030 
1490 I F"F’E=0THEN 1 520 
1500 VPOKEMf-D+1 ,PE: NEXT 
1510 GOSUB 1640 
1520 M=M+40: NEXTG 
1 530 LOCATEO , 1 5 : PR I NT A* ; 

1540 GOTO 1570 

1550 LOCATEO , G+5 : PR I NTW* 

1560 M=M-~7 : GOTO 610 
1570 LOCATEO, 21 : PRINTD* 

1580 IF INKEY*="" THEN 1580 
1590 IFZ*—" I " ANDPR>0THEN2670 
1 600 I F Z *= " A " ANDPR >0THEN2440 
1610 LC=USR9 (O) 

1620 I FPR >OTHEN 1 820 
1630 GOTO 400 

1 640 LOCATE 1 O , G+5 : PR I NTUS I NG " ### 
. ##" ; CA (I ,G) 

1 650 LOCATE 1 9 , G+5 : PR I NTUS I NG " ### 
. ##" ; CB d ,G> 

1 660 L0CATE27 , G+5 : PR I NTUS I NG" ### 
. ##" ; CC (I ,G) 

1 670 L0CATE33 , G+5 : PR I NTUS I NG " ### 


#. ##” ; VD < I ,G) 

1680 RETURN 

1690 CLSs PRINTS BEEP: PRINTED < I) :P 
RINTA*; 

1700 PRINTC*,A* 

1710 RETURN 

1720 'inicio presup 

1730 CLS: PR=1 

1740 L0CATE6,2:PRINT”*** *** * 


*** 

*** 

* * 



* 


* * 

* * 

* * 

* 





*** 

*** *** 

** 

* 

* 




* * 

* * 



* 

* 

* 


* 

* 

* 

* 

*** 

*** 

**” 





1750 

L0CATE4 ,9: PRINT 

" *** 

* 

* 

* 

*** 

*** 

*** ** 



* 


* * 

* * 

* * 

* * 





*** 

* * *■** 

** 

* 

* 


* 


* * 

* * 



* 

* 

* * 


* 

** 

* 

*** 

■*** 

* •**” 






1760 LOC ATEO ,19: PR I NTD* 

1770 S*=”tipo cant. 

*/u ♦total” 

1780 U=1 6 

1790 F*=”precio total del items 

*” 

1800 IFINKEY*=” "THEN 1800 
1810 LEC~USR9 (0) 

1820 Z*=INKEY*: IFZ*=” "THEN1820 

1830 IFZ*=”K”THENCLS: GOTO 1920 

1840 IFZ*= ,, I”THEN1430 

1850 IFZ*=”A”THEN1060 

1860 IFZ*=”0”THEN20 

1870 I F Z*= " L ” THEN500 

1880 I F Z *= " C " THEN2300 

1 890 I F Z *= ” F ” THEN END 

1900 IFZ*=”M”THENLC=USR9<0) 

1910 GOTO 1820 

1920 FOR I =0T01 7 : GOSUB2920 

1930 G0SUB2950 

1940 F0RG=0T09 

1950 'esdribir subitem 

1960 LOCATEO, U: PRINTD* 

1 970 K*= I NKE Y* : I FK*= ” ” THEN 1 970 
1980 LOCATEO , U s PR I NTW* 

1 990 I FK*=CHR* < 230 ) THENG0BUB2270 
; GOTO 1960 

2000 I FK*=CHR* <148) THEN2840 

2010 I FK*=CHR* (219) THEN2 1 80 

2020 VPOKEM , G+48 

2030 FORD= 1 T06 : G0SUB3030 

2040 I FPE=0THEN2 1 50 

2050 VPOKEM+D+1 , PE: NEXT 

2060 'cant subitem 

2070 LOCATE 1 3 , G+5 : PR I NTUS I NG " ### 

. ##” 5 VD < I , G) 

2080 I F VD (1,8) =0THEN2800 
2090 'orecio unit 


2100 LOCATE20 , G+5 s BEEP : INPUTPP<I 

f®> 

2110 L0CATE20 , 8+5 s PR I NTSPC < 1 0 ) 

2 1 20 LOC ATE20 , G+5 s PR I NTUS I NG ” ### 
##.##”;PP(I,G) 

2130 'precio subitem 
2140 V(I ,G)=VD(I ,G)*PP<I ,G) sLOCA 
TE30 , G+5 s PR I NTUS I NG ”######.##”; V 
( I , G) 

-2150 M=f1+40 

2160 I F Z*= ” A ” THEN2620 

2170 NEXTG 

2180 F0RN=0T06: PIT < I ) =P I T < I ) +V ( I 
,N) sNEXT 

2 1 90 LOCATEO , 1 5 s PR I NTA* ; : G0SUB2S 
90 

2200 LOCATEO, 22 : PR I NTD* 

2210 I F I NKE Y*= ” u THEN22 1 0 
2220 F I N=F I N+P I T < I ) 

2230 NEXT I 

2240 IFINKEY*="”THEN2240 
2250 BEEP s LEC=USR9 < O ) : GOTO 1 820 
2260 'escrit pantalla actual 
2270 EC=USR8<1> :LC=USR9<0> 

2280 FOR J = 1 TO 1 500 s NE X T s LC=USR9 < 1 
) : RETURN 

2290 ' CDsto total 
2300 CLS 

2310 BEEPs PR I NT "desari pci "n 

♦ 7.” 

2320 F0RI=0T017 
2330 BEEP: PRINTED (I) 

2340 IFPIT < I ) =0THEN2370 
2350 P0<I)=PIT<I)/FIN*100 
2360 L0CATE22 , I + 1 : PR I NTUS I NG ” ### 
### . ##” 5 PIT < I ) ; s PRINTTAB (34) US IN 
G”##. ##” ; PO ( I ) 

2370 NEXT 

2380 PRINT”costo total de obra: ” 
5 : PRINTTAB (22) USING”###### . ##” ; F 
IN; : PRINTTAB <33) ”100. 00" , A* 

2390 LOCATEO ,21: PR I NTD* , E* 

2400 I F I NKEY*= ” " THEN2400 
2410 LC=USR9 <0) 

2420 GOTO 1820 
2430 'modi f item 

2440 CLS: PRINT: PRINTED < I ) : PRINTA 

2450 PR I NTS*, A* 

2460 M=200 

2470 F0R6=0T09 

2480 VPOKEM, G+48 

2490 F0RD=1T06: G0SUB3030 

2500 I FPE=0THEN2530 

2510 VPOKEM+D+1 , PE sNEXT 

2520 G0SUB2850 

2530 M=M+40: NEXTG 

2540 LOCATEO, 15: PR I NT A* ; 

2550 BEEP : PR I NTF* ; : PRINTTAB (30) U 
SING”######. ##” :PIT < I ) 


2560 F I N=F I N—P I T ( I > i PIT < I > =PIT < I 
> —V ( I , G ) 

2570 'modif subitem 

2580 LOCATEO , 20 : PR I NTW* , E* 

2590 G=MG 

2600 L0CATE20,G+5: PR I NTSPC <«19) 
2610 M= (G+5) *40: G0T02100 
2620 PIT(I)=PIT(I)+V(I,G) 

2630 G0SUB2890 
2640 F I N=F I N+P I T < I ) 

2650 U=1 6: GOTO 2820 

2660 'lista un item 

2670 CLS 

2680 M=200 

2690 G0SUB2920 

2700 F0RG=0T09 

2710 VPOKEM, G+48 

2720 FORD= 1 T06 : G0SUB3030 

2730 IFPE=0THEN2760 

2740 VPOKEM+D+1 , PE: NEXT 

2730 G0SUB2850 

2760 M=M+40: NEXTG 

2770 LOCATEO, 15:PRINTA*; 

2780 G0SUB2890 
2790 GOTO 2820 
2800 LOCATEO, G+5: PR I NTW* 

2810 GOTO 1960 

2820 LOCATEO ,21: PR I NTD* 

2830 I F I NKEY*- ” ” THEN2830 
2840 LC=USR9 (0) : GOTO 1820 
2850 LOCATE 1 3 , G+5 : PR I NTUS I NG ” ### 
.##”; VD(I,G) 

2860 L0CATE20 , G+5 : PR I NTUS I NG ” ### 
##. ##” ; PP < I ,G) 

2870 L0CATE30 , G+5 : PR I NTUS I NG ” ### 
###. ##” ; V < I ,G) 

2880 RETURN 

2890 BEEP: LOCATEO, 16: PR I NTF* 

2900 L0CATE30 , 1 6 : PR I NTUS I NG ” #### 
##.##”; PIT < I ) 

2910 RETURN 

2920 CLS: PRINT : BEEP: PRINTS* ( I ) : P 
RINTA*; 

2930 PR I NTS*, A* 

2940 RETURN 

2950 LOCATEO, 17: PRINTA* 

2960 LOCATEO, 18: PR I NT "code + f 
= -final iza comp, o presup.” 

2970 PRINT”enter = reingres 

a subitem” 

2980 PR I NT "code + m = men#” 
2990 PRINT”graph + p = contin#a 
al item siguiente” 

3000 BEEPsPRINTE* 

3010 M=200: RETURN 

3020 NN=60000 ! + I *60+G*6+D- 1 : RETU 
RN 

3030 PE=PEEK < 60000 ! + 1 *60+G*6+D- 1 
) : RETURN 


LOAD 



NUEVA 

DIRECCION 


A partir del 21 de marzo la nueva direccion de LOAD MSX es 
M^jico 625 - Piso 3 2 (1097) - Buenos Aires 
Tel: 30 0991 y 331 7185 



PERIFERICOS TALENT 

No todos los usuarios conocen realmente la variedad de perifericos que existen para su MSX. 
Mas aun,desconocen las aplicaciones que pueden tener,como por ejemplo administrar una bascula 

para camiones de 60 toneladas. 



E 

m n general, lo primero que ob- 
serva el usuario potencial de una com- 
putadora es la gama de perifericos que 
puede disponer para su posible adqui- 
sicion. 

En el caso de las Talent MSX, la gama 
es amplia y esta pensada para un 
conjunto muy interesante de aplica- 
ciones dentro de las computadoras 
hogareilas. Demas esta decir que 
como son equipos desarrollados para 
la norma MSX, cualquier equipo in- 
cluido en la misma podra utilizar es- 
tos perifericos sin problemas. 

a) Unidad de discos 

El primer gran paso que suele dar el 
usuario novato es comprar una uni- 
dad de discos , ya que luego de trabajar 
con un datasete, las ventajas en cuan- 
to a confiabilidad y velocidad son im- 
portantes. 


En el caso de las unidades Talent, la 
DPF-550/555 es la que actualmente 
se encuentra disponible en plaza y 
permite almacenar 360 kbytes en dis- 
quetes de 5 1/4 pulgadas. Su veloci- 
dad de transferencia permite que la 
carga y grabacion de datos sea muy 
rapida y confiable. Ademas es com- 
patible en lectura y grabacion con las 


PC via el MS-DOS lo que permite in- 
tercambiar datos entre esas computa- 
doras y nuestra MSX. 

Por otra parte, si somos felices posee- 
dor de una MSX2 Turbo, podra utili- 
zar sin modificaciones el CP/M Plus, 
otro sistema operativo mas veloz que 
funciona en estas computadoras. 


CENTROS DE ASISTENCIAAL USUARIO DE TALENT MSX 


CAPITAL FEDERAL 

Taller Logo de computacion 
Junin 1930 

Centro de Computacion Clinica 
Asistencia al Usuario Discapacitado 
Ramsay 2250 - Pabellon F 
Tel. 784-2018 

Barrio Norte 

Uriburu 1063 - Tel. 83-6892/826- 
6692 

Belgrano 

Cabildo 735 - Tel. 772-9088 


Flores 

Gral. Artigas 354 - Tel. 612-3902 

Palermo 

Guatemala 4733 - Tel. 71-4124 

San Telmo 

Chile 1345 - Tel. 37-0051 al 54 

GRAN BUENOS AIRES 
Caseros 

Medina y Alberdi - ler piso - Tel. 750- 
8016. 

Castelar 

C. Casares 997 - Tel. 629-2247 


Lands 

Caaguazu 2186 - Tel. 240-0378 

Mor6n 

Belgrano 160 - Tel. 629-3347 

Ramos Mejia 

Bolivar 55 - ler. piso - Tel. 658-4777 

San Justo 

Peru 2515 (esq. Arieta) 

Vicente L6pez 

Av. Maipu 625 - Tel. 797-672 

Virreyes - Pdo. de San Fernando 

Avellaneda 1697 - Tel. 745-7963 


mmm 
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b) Monitor 

La segunda adquisicidn suele ser el 
monitor monocromatico, sobre todo 
si el usuario tiene intention de usar su 
computadora en aplicaciones “profe- 
sionales”, es decir, en contabilidad, 
ingen ieria y ciencias. La necesidad 
del monitor surge de que, aunque los 
colores que nos brinda la computado- 
ra son muy bonitos, para trabajar 
durante un tiempo medianamente 
prolongado no son muy recomenda- 
bles para la vista, pues generalmente 
producen fatiga ocular. 

c) Modem 

En los ultimos dos anos hemos visto 
surgir el furor por la telematica, que 
es la conjuncion de la informatica con 
las telecomunicaciones. En nuestro 
pais comenzaron a surgir diversas 
bases de datos y mensajerias electro- 
nicas que hacen de este periferico el 
punto central de atencion. 

Gracias al mismo, un usuario de La 
Quiaca podra enviar sus datos en for- 
ma instantanea a otro ubicado en 
Ushuaia, si ambos poseen modem (y 
telefono, por supuesto). 

El ambito de aplicacion de la tele- 
matica se va extendiendo dia a dia y 
cada vez son mas los usuarios que 


INTERIOR DEL PAIS 

Bahia Blanca - Buenos Aires 

Gral. Paz 257 - Tel. (091) 31582 

Junln - Buenos Aires 

Gandini 75 - Tel. (0362) 27956 

La Plata - Buenos Aires 

Calle48No. 529 - Tel. (021) 249905 al 
07 

Mar del Plata - Buenos Aires 

Av. Luro 3071 - 13o. “A” -Tel. (023) 
43430 

Necochea - Buenos Aires 

Calle 61 No. 2949 - Tel. (0262) 26583 


piensan que este periferico debe for- 
mar parte de su equipamiento. 

d) Teclado numerico 

Cuando hablamos de aplicaciones 
“serias” comunmente nos viene a la 
mente la utilizacion de una Talent 
MSX en el ambito de la pequena y 
mediana empresa, donde los sistemas 
de contabilidad, sueldos y jomales, 
stock, gestion de ventas, etc6tera 
campean sin problemas. 

El usuario que utiliza estas aplicacio- 
nes suele ser un administrative que, 
acostumbrado a usar calculadoras de 
tira de papel, realiza sus ingresos 
numericos en forma mas eficiente si 
posee un teclado similar al de estos 
equipos. 

De allf la utilidad del teclado numeri- 
co en la administracion y en planilla*s 
de calculo. 

Nota: En general la pregunta mas 
realizada respecto al teclado numeri- 
co es si es posible utilizarlo con el 
MSX Plan o el Multiplan. La respues- 
ta es no y si. No se puede usar con el 
MSX Plan por una limitation que este 
software posee respecto a instalar 
rutinas extemas al mismo. Y sf, pues 
el Multiplan trabaja en el MSXDOS y 
las rutinas implementadas en el fun- 
cionan sin problemas, ya sea en Mul- 
tiplan, Wordstar.Calcstar, MBASIC, 


Comodoro Rivadavia - Chubut 

San Martin 263 - Local 22 - Tel. 
(0967) 20794 

Cbrdoba - Cbrdoba 

9 dejulio 533 -Tel. (051)20083 

Villa Marla - C6rdoba 

Corrientes 1159 - 2do. piso - Tel. 
(0535)24311 

Concordia - Entre Rios 

Urdinarrain 50 - Tel. (045) 213229 

Parang - Entre Rios 

Cordoba 67- Tel. (043) 225987 

Mendoza -Mendoza 

Rivadavia 76 - ler. piso - Tel. (061) 


FORTRAN, COBOL, Turbo Pascal, 
etcetera. 

e) Interfase RS-232C 

En general, se desconoce la aplica- 
cion que puede tener este periferico 
en el entomo MSX (o en cualquier 
computadora). Su principal utilidad 
es la de brindar un vinculo estandar 
con otros perifericos o cualquier dis- 
positivo que lo incorpore, incluyendo 
obviamente las computadoras. 

Entre otras posibilidades, una 
RS232C permite interconectar su 
MSX a una impresora, a un modem 
(tipo Hayes compatible, que son los 
que utilizan las computadoras PC), 
equipos de distinto calibre (por ejem- 
plo BaireSoft implemento un sistema 
para administrar una bascula para 
camiones de 60 tn a una empresa 
contratista de SOMISA),etc6tera. 
Realmente la mayor utilidad que se le 
puede dar a una RS232C con la MSX 
es trabajar como terminal de una 
computadora (mayor). Por ejemplo, 
con una PC AT trabajando en Xenix, 
es muy facil utilizar un software 
“emulador de terminal”. La MSX se 
comporta como un teclado mas de 
dicha computadora, con la ventaja de 
ser una computadora en si misma. En 
plaza no se ha aprovechado mucho 
esta variante, pero realmente es algo 
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muy interesante y economico para las 
grandes instalaciones. 

f) Mouse 

Es uno de esos perifericos que estan 
dirigidos a un mercado mas especlfi- 
co: aquellos que utilizan sus compu- 
tadoras en aplicaciones graficas o en 
un entomo grafico al estilo Apple 
Macintosh. 

Para los que se mueven en este ambi- 
to, un periferico como el mouse de 
MSX es imprescindible para trabajar 
con soltura. Es uno de los que los 


yanquis denominan “pointing devi- 
ce” (dispositivo puntero) y tiene apli- 
cacion para dibujantes, grafistas, au- 
toedicion, arquitectos, etcetera. 

g) MiniLAN 

En realidad la MiniLAN II configura 
un conjunto de perifericos que unidos 
permiten un mejor aprovechamiento 
de una instalacion informatica, gene- 
ralmente en el ambito educativo. 
Dados los costos actuales del hardwa- 
re, no es nada despreciable la posibi- 
lidad deque hastalO consolas puedan 


compartir una o dos disqueteras y, 
opcionalmente, una impresora, con 
muy pocas diferencias respecto a la 
utilization directa de estos periferi- 
cos. 

En una nota posterior nos extendere- 
mos sobre estos perifericos educacio- 
nales, que permiten el acceso de todos 
los alumnos a aplicaciones del 
MSXDOS y MSX BASIC o LOGO, 
incluyendo compiladores de otros 
lenguajes como C, Turbo Pascal, 
COBOL y FORTRAN. 


TALENT MSX 
EN MAR DEL HOP 



Gracias a „„ accerdo ce.ebrado 
entre Telematica S .A. y la production 
del programa Mar del Hop! que con- 
duce Raul Portal, los equipos Talent 
MSX vuelven a los sets de television. 

En un esfuerzo importante se han 
facilitado en prestamo cerca de 9 
equipos completos para su uso en el 
programa. 

El encargado de computation que 
colabora con Raul Portal, Osvaldo 
Esposito, nos comento que en el pri- 
mer tramo del programa solo se utili- 
zaron nuestros equipos en dos tareas: 
el juego “Kenio”, que no es ni mas ni 
menos que el viejo y querido Simon, 
y el seguimiento de los numeros del 
“Mambo”, version portalesca del 
Bingo que utiliza modelos femeninos 
como bolillas (j!). 

Para cuando estas llneas ganen la 
calle se incorporara el uso de la digi- 
talizadora, que ya se encuentra en 
venta para el publico. Se tomaran 
“fotos digitalizadas” de los artistas 


que suelen visitar el programa y luego 
se les entregara una copia impresa 
autografiada. 

Por ultimo esta previsto ampliar el 
“Kenio” con una interfase para mane- 
jar siete luces de 220v en un tablero 
que incorporara pulsadores. 

No es la primera vez que Telematica 
S.A. colabora con la television. 


Hemos estado en programas como 
“La hora de los juegos” en Canal 1 1 , 
“Magazine” con Silvia Martinez y 
Luisa Delfino a principios del afio 
pasado en ATC, “Onda Joven” en 
Canal 11, y“TodoalNueve”en Canal 
9, en donde las pantallas de preguntas 
se manejan con equipos MSX. 


CONTESTANDO A LA 


Planillas 

<;Cudl es la diferencia entre el MSX 
Plan y el Multiplan para MSX? He 
visto que son muy similares y que 
pueden intercambiar planillas. 

Respuesta 

La diferencia principal es que el MSX 
Plan es un subconjunto del Multiplan 
y tiene algunas extensiones que per- 
miten utilizarlo con casete. Por otra 
parte, el MSX Plan viene en cartucho, 
mientras que el Multiplan se consigue 
en disquete. Algunas de las posibili- 
dades que incorpora el Multiplan, y 
que no vienen con el MSX Plan, son el 
uso de planillas extemas (external), 
ancho variable de las columnas, posi- « 
bilidad de uso ventanas para dividir la 
pantalla, ayuda en linea, etcetera. Por 
otra parte, el MSX Plan es comercia- 
lizado por Telematica S.A., lo que 
implica la existencia de manual en 
Castellano, cursos en los Centros de 
Asistencia, etcetera. 

Como conclusion, si ya tiene expe- 
rience con el Multiplan y posee dis- 
quetera, lo mas conveniente es usar el 
Multiplan de MSX. En cambio si no 
tiene disquetera,o no tiene experien- 



ce en el uso de planillas de calculo, la 
mejor opcion es usar el MSX Plan.ya 
que permite el empleo de casetes y su 
manejo es mucho mas sencillo que el 
del Multiplan. 

Procesadores de texto 

iCudles son los procesadores de tex- 
to existentes en el mercado para 
MSX? 

Respuesta 

Los procesadores de texto existentes 
en el mercado son los siguientes: 

MSX1 y 2 

MSX Write 
Idea Text 
MS Text 
Tasword 


HOT LINE 


Wordstar (con 80 columnas) 

MSX 2 

Wordstar 
Tasword II 
Melbrane Notes 

Philips Home Office 1 (paquete que 
incluye un procesador de texto) 
Philips Home Office 2 (paquete que 
incluye un procesador de texto) 
Philips Ease (paquete que incluye un 
procesador de texto)y algunos mas . 

Cobol 

iQue compiladores COBOL hay dis- 
ponibles para MSX? </ Viene alguno 
en cartucho? 

Respuesta 

Los compiladores COBOL disponi- 
bles para MSX vienen en disquete 
unicamente y son 3 (los que conoce- 
mos): 

RM COBOL 
Microsoft COBOL 80 
Nevada COBOL (solo en MS X2 - CP/ 
M Plus) 
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RITMOS 



CLASE: Utilitario 
AUTOR: Gonzalo Rodriguez Mir 
Participd en el 4- Concurso de 
programas 


1 programa Simula el sonido de 
una baterfa; puede programar dos rit- 
mos distintos a la vez, con sus ondas 
de sonido, y combinarlos. 
Inicialmente las ondas estan progra- 
madas simulando un redoblante, un 
bombo y un charleston (representa- 
dos respectivamente por los dibujos), 
sin embargo las ondas de volumen y 
tono del redoblante y del charleston 
pueden programarse a voluntad, pues 
son exactamente iguales en su trata- 
miento. El sonido de bombo no puede 
ser modificado y es el unico realizado 
con el tono del PSG, los otros dos 
estan hechos con ruido. 

La variedad de sonidos que se logra 
programando las ondas se puede 
apreciar mucho mejor conectando la 
salida de audio de la computadora a 
un equipo de alta fidelidad. 
El^programa puede ser util para aque- 
llos musicos que deseen tocar o reali- 
zar grabaciones con este tipo de 
acompanamiento. Tambien puede 
resultar interesante para quienes 
quieran aprender a dominar los tiem- 
pos en musica. 

El programa carece de cualquier tipo 
de efectos sonoros y tambien se ha 
desactivado el sonido “clik” depulsa- 
cion de teclado debido a que esto 
resulta molesto cuando se trabaja con 
volumen muy alto. 

FUNCIONAMIENTO 

En primer lugar se seleccionan las 


longitudes de ambos ritmos con las 
cuatro teclas de cursor. Si se quiere 
hacer un ritmo de 3x4, se escogera 12, 
para uno de 2x4 se pondra 8 o 16, 
etcetera. Una vez elegidos, se presio- 
na la barra espaciadora y se pasa a la 
pantalla principal. 

En esta pantalla se dibuja la estructura 
del ritmo deseado moviendo el cursor 
en las cuatro direcciones y oprimien- 
do la barra para imprimir o borrar un 
punto en el lugar correspondiente. 
Presionando la tecla “ESC”, el cursor 
pasa a la parte derecha de la pantalla. 
Una vez ahf, si se mueve hacia arriba 
o abajo, el cursor se desplaza, y hacia 
la izquierda o derecha, se modifican 
los numeros de repetition, velocidad 
del ritmo y velocidad de las ondas. 

A la derecha de cada ritmo figura la 
cantidad de repeticiones del ritmo 
correspondiente, y mas abajo la canti- 
dad general, de repeticiones. 
VELOCIDAD RITMO: Cuanto 
menores el numero, mayor es la velo- 
cidad con que se ejecuta. 
VELOCIDAD ONDA: Similar a los 
registros 11 y 12 del comando 
SOUND. Cuanto menor es el nume- 
ro, mas se “acorta” el sonido del gol- 
pe. 

Volviendoapresionarlatecla“ESC”, 
el cursor vuelve a la parte de dibujo de 
los ritmos. 

Teclas de funcion: 

• FI- EJEC: Se realiza automatica- 


mente una introduction de 3 golpes 
para marcar la entrada y a continua- 
tion se ejecuta el ritmo, que puede ser 
interrumpido con CTRL+STOP. 
•F2- ONDAS: Se visualizan las ondas 
de sonido. La de arriba es la de volu- 
men, la de abajo de tono, y correspon- 
den al sonido indicado por el dibujo. 
Con las teclas hacia la izquierda y 
derecha se desplaza el cursor. Hacia 
arriba y abajo se modifica la onda en 
el punto correspondiente. Con la ba- 
rra espaciadora se pasa a la onda si- 
guiente o vuelve a la pantalla princi- 
pal. 

•F3- INICIO: Vuelve al inicio (se 
borran el ritmo y las ondas que hay en 
memoria). 

•F4- SAVE: Sealmacena en casete un 
ritmo con sus valores y ondas. Prime- 
ro se ingresa el nombre (hasta 6 carac- 
teres) y luego se pulsa RETURN. 
•F5- LOAD: Carga un ritmo previa- 
mente grabado en casete. 

CARGADOR BASIC 

Se carga con CLOAD, despues de 
teclear RUN, el programa tarda un 
minuto aproximadamente hasta ter- 
minar su ejecucion. 

Para ejecutar el programa en codigo 
maquina se debe teclear: DEFUSR= 
&HD000: X= USR (0). 

El listado del cargador basic tiene al 
principio.para quienes quieran te- 
Conlinua en pag . 22 
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10 FOR A=0 TO 51 
20 S=0:DI=&HD000+A*82:DF=DI+81 
30 FOR N=DI TO DF : READ A$:POKE N 
, VAL ( "&H " +A$ ) : S=S+PEEK ( N ) 

40 NEXT 
50 READ T$ 

60 IF SOVAL( "&H"+T$> THEN BEEP: 
PRINT “ ERROR EN LINEA" ; ( A*2+8 ) * 
10; "O” ; (A*2+9)*10 
70 NEXT 

80 DATA 3E, 00, 32, DB, F3, CD, CC, 00, 
OE, 01, 06, E2, CD, 47, 00, 3E, 01, 32, 7F 
, F8, 3E, 00, 32, 80, F8, 3E, 05, 32, 8F, F 
8, 3E, 00, 32, 90, F8, 3E, 02, 32, 9F, F8, 
3E, 00, 32, AO, F8, 3E, 06, 32, AF, F8, 3E 
, 00, 32, BO, F8, 3E, 04, 32, BF, F8, 3E, 0 
0, 32, CO, F8, 21, 00, 38, 3E, 00, CD, 4D, 
00, 23, 3E, 00, CD, 4D, 00, 23, 3E, 00 
90 DATA 1DCC 

100 DATA CD, 4D,00,23,3E,00, CD, 4D 
, 00, 23, 3E, OF, CD, 4D, 00, 23, 3E, 30, C 

D, 4D, 00, 23, 3E, CO, CD, 4D, 00, 23, 3E, 
BO, CD, 4D, 00, 23, 3E, AF, CD, 4D, 00, 23 
, 3E, Al, CD, 4D, 00, 23, 3E, Al, CD, 4D, 0 
0, 23, 3E, 81, CD, 4D, 00, 23, 3E, 80, CD, 
4D, 00, 23, 3E, 70, CD, 4D, 00, 23, 3E, OF 
, CD, 4D, 00, 23, 3E, 00, CD, 4D, 00, 23 
110 DATA 199C 

120 DATA 3E, 00, CD, 4D, 00, 23, 3E, 00 
, CD, 4D, 00, 23, 3E, 00, CD, 4D, 00, 23,3 

E, 00, CD, 4D, 00, 23, 3E, EO, CD, 4D, 00, 
23, 3E, 18, CD, 4D, 00, 23, 3E, 06, CD, 4D 
, 00, 23, 3E, 1A, CD, 4D, 00, 23, 3E, EA, C 

D, 4D, 00, 23, 3E, OA, CD, 4D, 00, 23, 3E, 
OA, CD, 4D, 00, 23, 3E, 02, CD, 4D, 00, 23 
, 3E, 02, CD, 4D, 00, 23, 3E, 1C, CD, 4D 
130 DATA 18CD 

140 DATA 00, 23, 3E, EO, CD, 4D, 00, 23 
, 3E, 00, CD, 4D, 00, 23, 3E, 00, CD, 4D, 0 
0, 23, 3E, 01 , CD, 4D, 00, 23, 3E, OF, CD, 
4D, 00, 23, 3E, 10, CD, 4D, 00, 23, 3E, 20 
, CD, 4D, 00, 23, 3E, 40, CD, 4D, 00, 23, 3 

E, 40, CD, 4D, 00, 23, 3E, 80, CD, 4D, 00, 
23, 3E, 80, CD, 4D, 00, 23, 3E, 80, CD, 4D 
, 00, 23, 3E, 80, CD, 4D, 00, 23, 3E, 40 
150 DATA 1780 

160 DATA CD, 4D, 00, 23, 3E, 40, CD, 4D 
, 00, 23, 3E, 20, CD, 4D, 00, 23, 3E, 10, C 

D, 4D, 00, 23, 3E, OF, CD, 4D. 00, 23, 3E, 
00, CD, 4D, 00, 23, 3E, CO, CD, 4D, 00, 23 
, 3E, 20, CD, 4D, 00, 23, 3E, 90, CD, 4D, 0 

0, 23, 3E, 48, CD, 4D, 00, 23, 3E, 1C, CD, 
4D, 00, 23, 3E, 24, CD, 4D, 00, 23, 3E, 14 
, CD, 4D, 00, 23, 3E, 14, CD, 4D, 00, 23 
170 DATA 17 IB 

180 DATA 3E, 14, CD, 4D, 00, 23, 3E, 14 
, CD, 4D, 00, 23, 3E, 28, CD, 4D, 00, 23, 3 

E, 28, CD, 4D, 00, 23, 3E, 50, CD, 4D, 00, 
23, 3E, AO, CD, 4D, 00, 23, 3E, 00, CD, 4D 
, 00, 23, 3E, 00, CD, 4D, 00, 23, 3E, 00, C 

D, 4D, 00, 23, 3E, 01, CD, 4D, 00, 23, 3E, 

01, CD, 4D, 00, 23, 3E, 07, CD, 4D, 00, 23 
, 3E, 18, CD, 4D, 00, 23, 3E, FF, CD, 4D 
190 DATA 171F 

200 DATA 00, 23, 3E, 30, CD, 4D, 00, 23 
, 3E, OF, CD, 4D, 00, 23, 3E, 03, CD, 4D, 0 
0, 23, 3E, 01, CD, 4D, 00, 23, 3E, 01, CD, 
4D, 00, 23, 3E. 01, CD, 4D, 00, 23, 3E, 01 
, CD, 4D, 00, 23, 3E, 01, CD, 4D, 00, 23, 3 

E, 01, CD, 4D, 00, 23, 23, 23, 23, 23, 3E, 
CO, CD, 4D, 00, 23, 3E, 30, CD, 4D, 00, 23 
, 3E, FE, CD, 4D, 00, 23, 3E, 18, CD, 4D 
210 DATA 1619 

220 DATA 00, 23, 3E, EO, CD, 4D, 00, 23 
, 3E, 80, CD, 4D, 00, 21, 60, 38, 3E, C6, C 

D, 4D, 00, 23, 3E, 82, CD, 4D, 00, 21, 66, 
38, 3E, 82, CD, 4D, 00, 23, 3E, C6, CD, 4D 
, 00, 21, EO, 38, 3E, 18, CD, 4D, 00, 23, 3 

E, 24, CD, 4D, 00, 23, 3E, 42, CD, 4D, 00, 


3E, OF, 32, E9, F3, 3E, 04, 32, EA, F3, 3E 
, 04, 32, EB, F3, CD, 82, 00, 3E. 01, 32 
230 DATA 1CA7 

240 DATA AF, FC, CD, 5F, 00, 06, 07, 3E 
, Dl, 21, 00, IB, CD, 4D, 00, 23, 23, 23, 2 
3, 10, F7, 21, 00, CO, 06, 60, 23, 36, C8, 
10, FB, 26 , 01 , 2E , 08 , CD, C6 , 00, 2 1 , 1 1 
, DA, CD. OA, DA, 26 , 01 , 2E, OA, CD, C6 , 0 
0, 21, 29, DA, CD, OA, DA, 3E, 08, 32, 00, 
CO, 32, FF, BF, 3E, 48, 32, 62, CO, 3A, FF 
, BF, CD, C7, D9, 3E, 38, 32, 62, CO, 3A 
250 DATA 1F2E 

260 DATA 00, CO, CD, C7, D9, 21, 00, IB 
, 3E, 37, CD, 4D, 00, 23, 3E, C4, CD, 4D, 0 
0, 23, 3E, OC, CD, 4D, 00, 23, 3E, 01, CD, 
4D, 00, 3E, 38, 32, 62, CO, 21, 00, IB, 3E 
, 37, CD, 4D, 00, 3E, 02, 32, AF, FC, CD, 9 
F, 00, F5, 3E, 01, 32, AF, FC, FI, IE, 20, 
BB, CA, Bl, D3, IE, 1C, BB. 28, OC, IE, ID 
, BB, 28, 18, IE, IF, BB, 28, 27, 18, CD 
270 DATA 1D2C 

280 DATA 3A, FF, BF, IE, 10, BB, 28, C5 
, 3C, 32, FF, BF, CD, C7, D9, 18, BC, 3A, F 
F, BF, IE, 02, BB, 28, B4, 3D, 32, FF, BF, 
3A, FF, BF, CD, C7, D9, 18, A8, 3E, 48, 32 
, 62, CO, 21, 00, IB, 3E, 47, CD, 4D, 00, 3 
E, 02,32, AF, FC, CD, 9F, 00, F5, 3E, 01, 
32, AF, FC, FI, IE, 20, BB, 28, 37, IE, 1C 
, BB, 28, OD, IE, ID, BB, 28, 19, IE, IE 

oort T1ATA 9^71 a 

300 DATA BB, CA, 01, D3, 18, CD, 3A, 00 
, CO, IE, 10, BB, 28, C5, 3C, 32,00, CO, C 

D, C7, D9, 18, BC, 3A, 00, CO, IE, 02, BB, 
28, B4, 3D, 32, 00, CO, 3A, 00, CO, CD, C7 
, D9, 18, A8, 3E, 01, 32, 64, CO, 32, EB, C 
0, 3E, 32, 32, 66, CO, 32, EC, CO, 3E, 00, 
32, 65, CO, 21, 67, CO, 06, OF, 70, 23, 10 
,FC, 06, 11,36,00,23, 10, FB, 06, 20 
310 DATA 1FCE 

320 DATA 36, 17,23, 10, FB, 06, 08, 70 
, 23, 10, FC, 06, 18, 36, 00, 23, 10, FB, 0 
6, 20, 36, IE, 23, 10, FB, 3E, OF, 32, E9, 
F3, CD, 62, 00, 3E, 01, 32, AF, FC, CD, 5F 
, 00, 21, 40, 06, 3E, 10, CD, 4D, 00, 23, 3 

E, 10, CD, 4D, 00, 23, 3E, 10, CD, 4D, 00, 
23, 3E, 10, CD, 4D, 00, 23, 3E, 10, CD, 4D 
, 00, 23, 3E, 10, CD, 4D, 00, 23, 3E, 10 
330 DATA 17 IB 

340 DATA CD, 4D, 00, 23, 3E, 10, CD, 4D 
, 00, 23, 3E, 10, CD, 4D, 00, 23, 3E, 10, C 
D, 4D, 00, 23, 3E, 38, CD, 4D, 00, 23, 3E, 
7C, CD, 4D, 00, 23, 3E, 7C, CD, 4D, 00, 23 
, 3E, 38, CD, 4D, 00, 23, 3E, 10, CD, 4D, 0 
0, 23, 3E, 10, CD, 4D, 00, 21, 19, 20, 3E, 
IF, CD, 4D, 00, 21, 00, IB, 3E, 1A, CD, 4D 
, 00, 23, 3E, OA, CD, 4D, 00, 23, 3E, 00 
350 DATA 158A 

360 DATA CD, 4D, 00, 23, 3E, OF, CD, 4D 
, 00, 23, 3E, 2A, CD, 4D, 00, 23, 3E, OA, C 

D, 4D, 00, 23, 3E, 04, CD, 4D, 00, 23, 3E, 
OF, CD, 4D, 00, 23, 3E, 3A, CD, 4D, 00, 23 
, 3E, OA, CD, 4D, 00, 23, 3E, 08, CD, 4D, 0 
0, 23, 3E, OF, CD, 4D, 00, 23, 3E, 52, CD, 
4D, 00, 23, 3E, OA, CD, 4D, 00, 23, 3E, 00 
, CD, 4D, 00, 23, 3E, OF, CD, 4D, 00, 23 
370 DATA 1598 

380 DATA 3E,62,CD,4D, 00,23, 3E,0A 
, CD, 4D, 00, 23, 3E, 04, CD, 4D, 00, 23, 3 

E, OF, CD, 4D, 00, 23, 3E, 72, CD, 4D, 00, 
23, 3E, OA, CD, 4D, 00, 23, 3E, 08, CD, 4D 
, 00, 23, 3E, OF, CD, 4D, 00, 23, 3E, IF, C 
D, 4D, 00, 23, 3E, 20, CD, 4D, 00, 23, 3E, 
OC, CD, 4D, 00, 23, 3E, 01 , CD, 4D, 00, 3A 
, FF, BF, CB, 27, CB, 27, CB, 27, C6, 18 
390 DATA 18AB 

400 DATA 32, 63, CO, 3A, 00, CO, CB, 27 
, CB, 27, CB, 27, C6, 18, 32, ED, CO, 26, 0 
3, 2E, 05, CD, C6, 00, 3A, FF, BF, 47, 21, 
00, CO, 23, 7E, DF, 10, FB, 26, 03, 2E, 07 


, CD, C6, 00, 3A, FF, BF, 47, 21, 10, CO, 2 
3, 7E, DF, 10, FB, 26,03, 2E, 09, CD, C6, 
00, 3A, FF, BF, 47,21, 20, CO, 23, 7E, DF 
, 10, FB, 26, 03, 2E, OC, CD, C6, 00, 3A 
410 DATA 2116 

420 DATA 00, CO, 47, 21, 30, CO, 23, 7E 
, DF, 10, FB, 26, 03, 2E, OE, CD, C6, 00, 3 
A, 00, CO, 47, 21, 40. CO, 23, 7E, DF, 10, 
FB, 26, 03, 2E, 10, CD, C6, 00, 3A, 00, CO 
, 47, 21, 50, CO, 23, 7E, DF, 10, FB, 21, D 
6, 18, 3E, C8, CD, 4D, 00, 21, B6, 19, 3E, 
C8, CD, 4D, 00, 21, 36, 1A, 3E, C8, CD, 4D 
, 00, 21, 76, 1A, 3E, C8, CD, 4D, 00, 21 
430 DATA 1E41 

440 DATA B6, 1A, 3E, C8.CD, 4D, 00, 26 
, 14, 2E, 03, CD, C6, 00, 21, 41, DA, CD, 0 
A, DA, 26, 01, 2E, 12, CD, C6, 00, 21, 4A, 
DA, CD, OA, DA, 26, 01, 2E, 14, CD, C6, 00 
, 21, 6D, DA, CD, OA, DA, 26, 01, 2E, 16, C 

D, C6, 00, 21, 5A, DA, CD, OA, DA, 26, 01, 
2E, 13, CD, C6, 00, 21, 81, DA, CD, OA, DA 
, 26, 01, 2E, 15, CD, C6, 00, 21, 89, DA 
450 DATA 1F8D 

460 DATA CD, OA, DA, 3E, 30, 32, 62, CO 
, 3A, 64, CO, CD, C7, D9, 3E, 68, 32, 62, C 
0, 3A, 65, CO, CD, C7, D9, 3E, 88, 32, 62, 
CO, 3A, EB, CO, CD, C7, D9, 3E, 98,32, 62 
, CO, 3A, 66, CO, CD, C7, D9, 3E, A8, 32, 6 
2, CO, 3A, EC, CO, CD, C7, D9, 3E, 20, 32, 
61, CO, 3E, 20, 32, 62, CO, 3E, 07, IE, FF 
, CD, 93, 00, 3E, 02, 32, AF, FC, CD, 9F 
470 DATA 29A2 

480 DATA 00, F5, 3E, 01 , 32, AF, FC, FI 
, 67, 3E, 06, BC, CA, BA, DF, 3E, 04, BC, C 
A, 3E, EO, 3E, 01, BC, CA, BO, DD, 3E, 05, 
BC, CA, 91, DA, 3E, 02, BC, CA, 7B, D2, 3E 
, 20, BC, C2, 21, D7, 3A, 61, CO, 47, 3E, 9 
8, B8, 38, BC, 21, 00, 00, 3A, 62, CO, 6F, 
CB, 25, CB, 14, CB, 25, CB, 14, E5, 01, 00 
, 00, 3A, 61, CO, 4F, CB, 39, CB, 39, CB 
490 DATA 2630 

500 DATA 39, El, 09, 01, 00, 18, 09, CD 
, 4A, 00, 47, 3E, C8, B8, 28, 04, 3E, C8, 1 
8, 02, 3E, C9, F5, CD, 4D, 00, 3A, 62, CO, 
5F, 3E, 20, BB, 20, 05, 21, 01, CO, 18, 2B 
, 3E, 30, BB, 20,05,21, 11, CO, 18, 21, 3 

E, 40, BB, 20, 05, 21, 21, CO, 18, 17, 3E, 
58, BB, 20, 05, 21, 31, CO, 18, OD, 3E, 68 
,BB, 20, 05, 21, 41, CO, 18,03,21,51 
510 DATA 17CB 

520 DATA CO, 3A, 61 , CO, CB, 3F, CB, 3F 
, CB, 3F, D6, 04, 4F, 06, 00, 09, FI, 77, C 
3, 5A, D6, 3E, IB, BC, 20, 21 , 3A, 61 , CO, 
47, 3E, BO, B8, 28, OD, 3E, BO, 32, 61, CO 
, 3E, 30, 32,62, CO, C3, 4E, D8, 3E, 20, 3 
2, 61, CO, 32, 62, CO, C3, 4E, D8, 3A, 61, 
CO, 47, 3E, BO, B8, CA, 62, D8, 3E, IE, BC 
, 20, 4C, 3A, 62, CO, 47, 3E, 20, B8, 20 
530 DATA 2322 , 

540 DATA 19, 3A, 61, CO, 47, 3A, ED, CO 
, B8, D2, 70, D7, 3A, ED, CO, 32, 61, CO, 3 
E, 78, 32, 62, CO, C3, 4E, D8, 3E, 58, B8, 
20, 19, 3A, 61, CO, 47, 3A, 63, CO, B8, D2 
, 8E, D7, 3A, 63, CO, 32, 61, CO, 3E, 40, 3 
2, 62, CO, C3, 4E, D8, 3A, 62, CO, OE, 10, 
91, 32, 62, CO, C3, 4E, D8, 3E, IF, BC, 20 
, 49, 3A, 62, CO, 47, 3E, 78, B8, 20, 19 
550 DATA 2594 

560 DATA 3A, 61, CO, 47, 3A, 63, CO, B8 
, D2, Cl, D7, 3A, 63, CO, 32, 61, CO, 3E, 2 
0, 32, 62, CO, C3, 4E, D8, 3E, 40, B8, 20, 
18, 3A, 61, CO, 47, 3A, ED, CO, B8, D2, DF 
, D7, 3A, ED, CO, 32, 61, CO, 3E, 58,32, 6 
2, CO, 18, 68, 3A, 62, CO, C6, 10,32,62, 
CO, 18, 5E, 3E, ID, BC, 20, 2A, 3A, 61 , CO 
, 47, 3E, 20, B8, 20, 15, 3A, 62, CO, IE 
570 DATA 240B 


clearlo, una rutina que detecta en que 
numero de lfnea hay error . 

Es importante grabarlo antes de eje- 


580 DATA 4B, BB, 30, 05, 3A, 63, CO, 18 
, 03, 3A, ED, CO, 32, 61, CO, 18, 3B. 3A, 6 
1, CO, OE, 08, 91, 32, 61, CO, C3, 4E, D8, 
3E, 1C, BC, C2, 5A, D6, 3A, 81. CO, 47, 3A 
,62, CO, IE, 4B,BB, 30, 05, 21, 63, CO, 1 

8, 03, 21, ED, CO, 7E, B8, 20, 07, 3E, 26, 
32, 61, CO, 18, OA, 3A, 61, CO, C6, 08, 32 
, 61, CO, 18, 00, 21, 18, IB, 3A, 62, CO 
590 DATA 1E7E 

600 DATA 3D, CD, 4D, 00, 23, 3A, 61, CO 
, CD, 4D, 00, C3, 5A, D6, 3E, IE, BC, 20, 3 
0, 3A, 62, CO, 47, 3E, 30, B8, 20, 07, 3E, 
A8, 32, 62, CO, 18, D7, 3A, 62, CO, IE, 68 
, BB, 20, 04, OE, 38, 18, OB, IE, 88, BB, 2 

0, 04, OE, 20, 18, 02, OE, 10, 3A, 82, CO, 
99, 32, 62, CO, 18, B7, 3E, IF, BC, 20, 30 
, 3A, 62, CO, 47, 3E, A8, B8, 20, 07, 3E 
610 DATA 1B9F 

620 DATA 30, 32, 62, CO, 18, A2, 3A, 62 
, CO, IE, 30, BB, 20, 04, OE, 38, 18, OB, 1 
E, 68, BB, 20, 04, OE, 20, 18, 02, OE, 10, 
3A, 62, CO, 81, 32, 62, CO, 18, 82, 3E, 1C 
, BC, 20, 78, 3A, 62, CO, IE, 30, BB, 28, 1 

1, IE, 68, BB, 28, IF, IE, 88, BB, 28, 2D, 
IE, 98, BB, 28, 3B, 18, 4C, 3A, 64, CO, 06 
, 63, B8, CA, 5A, D6, 3C, 32, 64, CO, CD 
630 DATA 1B60 

640 DATA C7, D9, C3, 5A, D6, 3A, 65, CO 
, 06, 63, B8, CA, 5A, D6, 3C, 32, 65, CO, C 

D, C7, D9, C3, 5A, D6, 3A, EB, CO, 06, 63, 
B8, CA, 5A, D6, 3C, 32, EB, CO, CD, C7, D9 
, C3, 5A, D6, 3A, 66, CO, 06, 63, B8, CA, 5 
A, D6, 3C, 32, 66, CO, CD, C7, D9, C3, 5A, 
D6, 3A, EC, CO, 06, 63, B8, CA, 5A, D6, 3C 
, 32, EC, CO, CD, C7, D9, C3, 5A, D6, 3E 
650 DATA 2FA1 

660 DATA ID, BC, C2, 5A, D6, 3A, 62, CO 
, IE, 30, BB, 28, 11, IE, 68, BB, 28, IF, 1 

E, 88, BB, 28, 2D, IE, 98, BB, 28, 3B, 18, 
4C, 3A, 64, CO, 06, 01, B8, CA, 5A, D6, 3D 
, 32, 64, CO, CD, C7, D9, C3, 5A, D6, 3A, 6 

5, CO, 08, 00, B8, CA, 5A, D6, 3D, 32, 65, 
CO, CD, C7, D9, C3, 5A, D8, 3A, EB, CO, 06 
, 01, B8, CA, 5A, D6, 3D, 32, EB, CO, CD 
670 DATA 2679 

680 DATA C7, D9, C3, 5A, D6, 3A, 66, CO 
, 06, 01, B8, CA, 5A, D6, 3D, 32, 66, CO, C 
D, C7, D9, C3, 5A, D6, 3A, EC, CO, 06, 01, 
B8, CA, 5A, D6, 3D, 32, EC, CO, CD, C7, D9 
, C3, 5A, D6, F5, 3A, 62, CO, CB, 3F, CB, 3 

F, CB, 3F, 3C, 6F, 28, 19, CD, C6, 00, FI, 
6F, 3E, 00, 26, 00, OE, OA, 08, 08, CB, 25 
, 17, B9, F5, 3F, CB, 14, FI, 38, 01, 91 
690 DATA 28 IF 

700 DATA 10, F2, F5, 3E, 30, 84, DF, 3A 
, 62, CO, CB, 3F, CB, 3F, CB, 3F, 3C* 8F, 2 

6, 1A, CD, C6, 00, FI, C6, 30, DF, CO, 7E, 
23, DF, B7, 20, FA, C9, 4C, 4F, 4E, 47, 49 
, 54, 55, 44, 20, 43, 4F, 4D, 50, 41, 53, 2 
D, 52, 49, 54, 4D, 4F, 31, 20, 00, 4C, 4F, 
4E, 47, 49, 54, 55, 44, 20, 43, 4F, 4D, 50 
, 41, 53, 2D, 52, 49, 54, 4D, 4F, 32, 20 
710 DATA 1F0E 

720 DATA 00,52,45,50,45,54,49,43 
, 2E, 00, 46, 31, 2D, 45, 6A, 65, 63, 20, 2 
0, 20, 54, 4F, 54, 41, 4C, 00, 46, 35, 2D, 
4C, 6F, 61,64, 20, 20, 20, 58, 45, 4C, 2E 
, 4F, 4E, 44, 41, 00, 46, 33, 2D, 49, 6E, 6 

9, 63, 20, 20, 20, 58, 45, 4C, 2E, 52, 49, 
54, 4D, 4F, 00, 46, 32, 2D, 4F, 6E, 64, 61 
, 00, 46, 34, 2D, 53, 61, 76, 65, 00, 06 
730 DATA 1484 

740 DATA 07, 3E, Dl, 21, 00, IB, CD, 4D 
, 00, 23, 23, 23, 23, 10, F7, 3E, 01, 32, E 

7, CO, 3E, 01, 32, E9, F3, CD, 62, 00, 3E, 

02, 32, AF, FC, CD, 5F, 00, CD, C3, 00, 21 
, 00, IB, 3E, Dl, CD, 4D, 00, 3E, 07, 32, F 
2, F3, 21, FF, FF, 23, E5, 11,45,00, 19, 
44, 4D, 11, 00, 00, CD, 11, 01, CD, 20, 01 
, 06, BD, CD, 08, 01, CD, 20, 01, 10, F8 
750 DATA 1CC1 


cutarlo. El programa en codigo 
maquina se graba con BSAVE, 
“CAS: RITMOS”, &HD000, 


760 DATA El, 3E, 01, BD, 20, DF, 11, 40 
, 00, 01, 45, 00, CD, 11, 01, CD, 20, 01, 0 
6, 84, CD, FC, 00, CD, 20, 01, 10, F8, 21, 
FF, FF, 11, BD, 00, 01, 45, 00, CD, 11,01 
, CD, 20, 01, 06, 84, CD, FC, 00, CD, 20, 0 
1, 10, F8, 3E, 47, 32, 61, CO, 3E, 3D, 32, 
62, CO, 21, 1C, IB, 3E, 3F, CD, 4D, 00, 23 
, 3E, 48, CD, 4D, 00, 23, 3E, 1C, CD, 4D 
770 DATA 1BC0 

780 DATA 00, 23, 3E, OF, CD, 4D, 00, 21 
, 03, IB, 3A, E7, CO, IE, 01, BB, 28, 03, 2 
1, OB, IB, 3E, OF, CD, 4D, 00, 2B, 2B, 3E, 
20, CD, 4D, 00, 2B, 3E, 32, CD, 4D, 00, 3E 
, 1C, 32, B7, FC, 3E, 1C, 32, B9, FC, 3E, 5 

6, CD, 8D, 00, 3E, 4F, CD, 8D, 00, 3E, 4C, 
CD, 8D, 00, 3E, 2E, CD, 8D, 00, 3E, 1C, 32 
, B7, FC, 3E, 6E, 32, B9, FC, 3E, 54, CD 
790 DATA 1C10 

800 DATA 8D, 00, 3E, 4F, CD, 8D, 00, 3E 
, 4E, CD, 8D, 00, 3E, 4F, CD, 8D, 00, 21, 8 

7, CO, 3A, E7, CO, IE, 01, BB, 28, 03,21, 
A7, CO, 06, 20, C5, 7E, E5, 21, 20, 00, 48 
, 06, 00, ED, 42, CB, 25, CB, 25, 11, 48, 0 

0, 19, CB, 27, CB, 27, 2F, CE, 3D, 44, 4D, 
5F, 16, 00, CD, 2 A, DD, El, 23, Cl, 10, D9 
, 06, 20, C5, 7E, E5, 21, 20, 00, 48, 06 
810 DATA 1DD8 

820 DATA 00, ED, 42, CB, 25, CB, 25, 11 
, 48, 00, 19, CB, 27, CB, 27, 2F, CE, BA, 4 

4, 4D, 5F, 16, 00, CD, 2A, DD, El, 23, Cl, 
10, D9, CD, 9F, 00, 67, 3E, 20, BC, 20, 23 
, 3A, 62, CO, IE, 3D, BB, 20, OA, 3E, BA, 1 
E, 01, 32, 62, CO, C3, 14, DD, 3A, E7, CO, 
IE, 01, BB, C2, FI, D3, 3E, 02, 32, E7, CO 
, C3, B6, DA, 3E, ID, BC, 20, ID, 3A, 61 
830 DATA 222B 

840 DATA CO, 47, 3E, 47, B8, 20, 08, 3E 
, C3, 32, 61, CO, C3, 14, DD, 3A, 61, CO, 0 
E, 04, 91, 32, 61, CO, C3, 14, DD, 3E, 1C, 
BC, 20, 1C, 3A, 61, CO, 47, 3E, C3, B8, 20 
, 08, 3E, 47. 32, 61, CO, C3, 14, DD, 3A, 6 

1, CO, C6, 04, 32, 61, CO, C3, 14, DD, 3E, 
IE, BC, 20, 07, 3E, F9, 32, EE, CO, 18, OB 
, 3E, IF, BC, C2, F9, DB, 3E, 01, 32, EE 
850 DATA 228D 

860 DATA CO, 21, 67, CO, 3A, E7, CO, IE 
, 01, BB, 28, 03, 21, A7, CO, 3A, 62, CO, 1 
E, 3D, BB, 28, 04, 11, 20, 00, 19, 3A, 61, 
CO, CB, 3F, CB, 3F, D6, 11, 4F, 06, 00, 09 
, E5, 3A, EE, CO, IE, F9, BB, 28, OA, 7E, 1 
E, 00, BB, 20, 19, El, C3, F9, DB, 16, IE, 
3A, 62, CO, IE, 3D, BB, 20, 02, 16, OF, 7E 
, 5A, BB, 20, 04, El, C3, F9, DB, 7E, CB 
870 DATA 2150 

880 DATA 27, CB, 27, 2F, 3C, 3C, F5, 3A 
, 62, CO, 4F, FI, 89, 3D, 3D, 5F, 16, 00, 3 
A, 61, CO, 3C, 4F, 06, 00, CD, 58, DD, El, 
7E, F5, 3A, EE, CO, IE, F9, BB, 20, 04, FI 
, 3C, 18, 02, FI, 3D; 77, 2A, E9, CO, 26, 0 
0, ED, 4B, EE, CO, 09, 54, 5D, ED, 4B, E8, 
CO, CD, 2A, DD, C3, F9, DB, 21, 1C, IB, 3A 
, 62, CO, C6, 02, CD, 4D, 00, 23, 3A, 61 
890 DATA 250D 

900 DATA CO, 3D, CD, 4D, 00, C3, F9, DB 
, ED, 43, E8, CO, ED, 53, E9, CO, 06, 04, C 

5, ED, 4B, E8, CO, 06, 00, CD, 11, 01, CD, 
20, 01, CD, FC, 00, CD, 20, 01, CD, FC, 00 
, CD, 20, 01, CD, FC, 00, CD, 20, 01, Cl, 1 
3, 10, DD, C9, ED, 43, E8, CO, ED, 53, E9, 
CO, 06, 04, C5, ED, 53, E9, CO, ED, 4B, E8 
, CO, 06, 00, CD, 11, 01, CD, 4A, 00, 2F 
910 DATA 2924 

920 DATA CD, 4D, 00, ED, 4B, E8, CO, ED 
, 5B, E9, CO, 06, 00, 16, 00, CD, 11,01,C 
D, 20, 01, CD, FC, 00, CD, 20, 01, CD, FC, 
00, CD, 20, 01, CD, FC, 00, CD, 20, 01, CD 
, 11, 01, CD, 4A, 00, CD, 11, 01, CD, 4A, 0 
0, 2F, CD, 4D, 00, Cl, 13, 10, B3, C9, 3E, 
07, IE, EE, CD, 93, 00, 3E, 01, 32, FO, CO 
, 32, F3, CQ, 32, F2, CO, 3E, 00, 32, FI 
930 DATA 228A 


&HE098, y se carga con BLOAD 
“CAS:”, R. 


940 DATA CO, 3A, FF, BF, 2E, 10, BD, C2 
, D5, DD, 3E, 04, C3, E2, DD, 2E, OC, BD, C 
2, EO, DD, 3E, 03, C3, E2, DD, 3E, 02, 4F, 
3E, 09, IE, 10, CD, 93, 00, 3E, 06, IE, 00 
. CD. 93, 00, 3E, OC, IE, 00, CD, 93, 00, 3 
E, OB, IE, IE, CD, 93, 00, 3E, 08, IE, 00, 
CD, 93, 00, 3E, 00, F5, 3E, OD, IE, 00, CD 
, 93, 00, 41, 3E, 00, 32, 9E, FC, 3A, 86 
950 DATA 1EA2 

.960 DATA CO, CB, 3F, CB, 3F, 6F, 3A, 9E 
, FC, BD, DA, IE, DE, 10, EA, FI, 3C, F5, 1 
E, 03, BB, C2, 09, DE, CD, B7, 00, DA, 5A, 
D6, 21, FF, BF, 3A, FO, CO, IE. 01, BB, 28 
, 03, 21, 00, CO, 7E, 5F, 3A, FI, CO, BB, 2 
8, 06, 3C, 32, FI, CO, 18, 52, 3E, 01, 32, 
FI , CO, 3A, FO, CO, IE, 01, BB, 20, 1C, 3A 
, 64. CO, 5F, 3A, F3, CO, BB, 28, 08, 3C 
970 DATA 26B3 

980 DATA 32, F3, CO, 18,35, 3E, 02, 32 
, FO, CO, 3E, 00, 32, F3, CO, 18, DC, 3A, 6 

5, CO, 5F, 3A, F3, CO, BB, 28, 06, 3C, 32, 
F3.C0, 18, 19, 3E, 01, 32, FO, CO, 3E, 01 
, 32, F3, CO, 3A, EB, CO, 5F, 3A, F2, CO, B 

B, CA, 5A, D6, 3C, 32, F2, CO, 3E, 00, 32; 
9E, FC, 21, 10, CO, 3A, FO, CO, IE, 01, BB 
, 28, 03, 21, 40, CO, 3A, FI, CO, 5F, 16 
990 DATA 2506 

1000 DATAOO, 19, 7E, IE, C8, BB, 28, 1C 
, 3E, 01, IE, OF, CD, 93, 00, 3E, 08, IE, 1 

0, CD, 93, 00, 3E, OC, IE, 04, CD, 93, 00, 
3E, OD. IE, 00, CD, 93, 00. 7D, D6. 10, 6F 
, 16, 00, 7E, IE, C8, BB, CA, EF, DE, 16, 0 

1, 7A, 32, F4, CO, 7D, C6, 20, 6F, 16, 00, 
7E, IE, C6, BB, CA, 02, DF, 16, 01, 7A, 32 
, F5, CO, 3E, 00, 32, FA, CO, 3A, FA, CO 
1010 DATA 1F0E 

1020 DATA3C, 32, FA, CO, 3E, 00, 32, F6 
, CO, 32, F7, CO, 3A, F4, CO, IE, 01, BB, 2 
0, 14, 21, 66, CO, 3A, FA, CO, 85, 6F, 7E, 
32, F6, CO, 7D, C6, 20, 6F, 7E, 32, F7, CO 
, 3A, F5, CO, IE, 01, BB, 20, ID, 21. A6, C 

0, 3A, FA, CO, 85, 6F, 7E, 5F, 3A, F6, CO, 
BB, D2, 5B, DF, 7B, 32, F6, CO, 7D, C6, 20 
, 6F, 7E, 32, F7, CO, 3A, F7, CO, 5F, 3E 
1030 DATA 2A34 

1040 DATA1E, 93, 32, F7, CO, 3A, F7, CO 
, 5F, 3E, 06, CD, 93, 00, 3A, F6, CO, 5F, 3 
E, 09, CD, 93, 00, 3A, EC, CO, 16, 00, 5F, 

06, 03, CB, 23, CB, 12, 10, FA, 21, 00, 00 
, 3A, 66, CO, CB, 3F, CB, 3F, 47, 3A, 9E, F 

C, B8, D2, 30, DE, 23, CD, 20, 00, 28, 02, 
18, FI, 3A, FA, CO, 4F, 3E, 20, B9, C2, OB 
, DF, 3A, 88, CO, CB, 3F, CB, 3F, 47, 3A 
1050 DATA 2343 

1080 DATA9E, FC, B8, D2, 30, DE, 18, F7 
, 21, F9, BF, 06, 06, 36, 20, 23, 10, FB, 2 
6, 01, 2E, 01, CD, C6, 00, 21,91, EO, CD, 
OA, DA, 21, F9, BF, 06, 06, 3E, 02, 32, AF 
, FC, CD, 9F, 00, F5, 3E, 01, 32, AF, FC, F 

1, IE, OD, BB, CA, OB, EO, IE, 20, BB, DA, 
D6, DF, 77, DF, 23, 10, EO, 3E, 02, 32, AF 
, FC, CD, 9F, 00, F5, 3E, 01, 32, AF, FC 
1070 DATA 286C 

1080 DATAF1 , IE, OD, BB', C2 , F6, DF, 3E 
, 00, CD, EA, 00, 21, F9, BF, 06, 08, C5, E 
5, 7E, CD, ED, 00, El, Cl, 23, 10, F5, CD, 
FO, 00, 3E, 00, CD, EA, 00, 21, FF, BF, 06 
, EE, C5, E5, 7E, CD, ED, 00, El, Cl, 23, 1 
0, F5, CD, FO, 00, C3, FI, D3, 3E, 07, IE, 
B8, CD, 93, 00, CD, El, 00, 21, F9, BF, 06 
, 06, C5, E5, CD, E4, 00, DA, 7B, D2, El 
1090 DATA 2 CD A 

1100 DATAC1, 77, 23, 10, F2, CD, E7, 00 
, 26, 01, 2E, 01, CD, C8, 00, 21, 91, EO, C 

D, OA, DA, 06, 06,21, F9, BF, 7E, DF, 23, 
10, FB, CD, El, 00, 21, FF, BF, 06, EE, C5 
, E5, CD, E4, 00, DA, 7B, D2, El, Cl, 77. 2 
3, 10, F2, CD, E7, 00, C3, FI, D3, 4E, 4F, 
4D, 42, 52, 45, 3A, 00, 00, 00, 00, 00, 00 
, 00, 00, 00, 00, 00, 00, 00, 00, 00, 00 
1110 DATA 2126 
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Respuestas correctas 


l)a. Memoria RAM de video. 2)b. Tipografia para sacar archivos por impresora. 
3)b De pantalla. 4) b.Un trazador de graficos. 5)b. Video Display Processor 


MSX-TEST No 15-CIERRE 1 DE MAYO DE 1989 


lUQu® notacion musical se 
utiliza en la MSX? 

a. alfabetica 

b. alfanumerica 

c. notacion de Weisner 

2);,Cuantos utilitarios nuevos 
incorpora el MSX-DOSTOOLS? 

a. 20 

b. 28 


c. 36 

3) ^Cual es el archivo que, en caso 
de ser hallado, carga y ejecuta 
automaticamente un programa? 

a. AUTOEXEC.BAS 

b. COMMAND.COM 

c. MSXDOS.SYS 

4) ^Que tipo de joystick es el 
WARP I? 


Nombre y apellido:- 


Direccion: - 


Documento: 


-Edad:- 


-Maquina: 


Que es lo que mas le gusta de la revista: - 
Que le agregaria: 


a. mecdnico 

b. electronico 

c. electromccanico 

5)iCuantos canales de sonido 
se pueden utilizar en la MSX? 

a. tres 

b. cinco 

c. dieciseis 


Que es lo que no me gusta:- 




RUTS N AS 


( SACANDO CONEJOS DE LAS k 

M 'S' Xl 


Como si fuera la galera de un mago, nuestra computadora brinda la 
oportunidad de sacar un truco tras otro. Desde provocar y anular sonidos hasta 
escribir enltalic” pasando por la decoracion de las caratulas de pantallas. 



o 

nas una coleccidn de trucos, rutinas y 
pequenos programas para ias compu- 
tadoras MSX. Los mismos nospermi- 
tiran conocer muchas posibilidades 
que nos brinda nuestra computadora. 

1) PantalIa por paginas 

Con este truco podremos ver la panta- 
11a en el modo texto, pagina por pagi- 
na, exceptuando las paginas 2 y 3. 

10 INPUT “ENTRA UN VALOR 
DEL 0 AL 15, PERO QUE SEA 
DISTINTO A 2 y 3”;X 
20 B ASE(0)=X* 1024 : VDP(2)=X : 
POKE&HF23,X*4 

2) Rapidez en alta resolucion 
Veamos las diferencias entre el tiem- 
po de ejecucion de estos dos listados. 
La clave de la rapidez esta en la 
instruccion VPOKE 

LIST ADO 1 
10 SCREEN 2 
20 FOR J=1 TO 192 
30 FOR 1=1 TO 255 STEP 8 
40 LINE(U)-STEP(8,0),X 
50 X=X+1 : IF X>15 THEN X= 1 
60 NEXT I,J 
70 X $=INPUT$(1) 


LIST ADO 2 

10 SCREEN 2 
20 COLOR 1,1 
30 X=0 

40 FOR 1=8192 TO 14335 STEP 8 
50 FOR J=0 TO 7 
60 VPOKE I+J.X+J 
70 NEXT J 
80 X=X+1 

90 IF X+248 THEN X=0 

100 NEXT I 

110 X$=INPUT4$(1) 


3) Visualizacion de las teclas de fun- 
cion 

Para ver las sentencias definidas para 
las teclas de funcion debemos colocar 
POKE&HF3DE,l. Para que desapa- 
rezcan, el truco es POKE&HF3DE,0. 
La aparicion y desaparicion se produ- 
ce reci6n despues de colocar CLS o 
presionar la tecla SHIFT. 

4) Cuestion de ruidos 

Con POKE&HF3DB, 1 escuchare- 
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mos un eco luego de apretar cada 
tecla. Con POKE&HF3DB, 0 ese rui- 
do desaparece. 

5) Secuencias de escape 

Estas funciones estan disponibles 
desdc el PRINT del BASIC, la rutina 
de BIOS CHPUT, CONOUT del 
BIOS del MSX-DOS llamado direc- 
tamente y CONSOLE OUTPUT de la 
funcion del MSX-DOS. 

[ESC] A Cursor arriba 
[ESC] B Cursor abajo 
[ESC] C Cursor derecha 
[ESC] D Cursor izquierda 
[ESC] H Cursor a home 
[ESC]Y [Fila+20H] [Columna+20H] 
funcion locate 
[ESC] E Borrar pantalla 
[ESC] K Borrar hasta el fin de la linea 
[ESC] J Borrar hasta el fin de la pan- 
talla 

[ESC] U Borrar toda la linea 
[ESC] L Insertar una linea 
[ESC] M Eliminar una linea 
[ESC]x4 Coloca el cursor relleno 
[ESC]x5 Apaga cursor 
[ESC]y4 Coloca el cursor pequcno 
[ESC]y5 Prende cursor 

6) Locate 

Si queremos utilizar el MB ASIC y su 
respectivo compilador, nos encontra- 
mos que no tenemos la sentencia 
LOCATE que permite ubicar el- cur- 
sor en la pantalla. Para poder simular 
esta sentencia podcmos definir la 
siguiente funcion: 
10DEFFNCUR$(X,Y)=CHR$(27) 
+”Y”+CHRS(X+32)+CHRS(Y +32) 
y luego utilizarla con la sentencia 
PRINT: 

18PRINT FNCURS(10,10);”ESTO 
ES UN TEST” 

7) Input diferente 

Esta rutina anula la aparicion del sig- 
no ? en el INPUT. Para recuperar el 
INPUT normal debemos colocar 
POKE &HFDE0,&HC9 
10 POKE &HFDE1 ,&HC3 
20 POKE&HFDE2,&HD2 
30 POKE &HFDE3,&H23 
40 POKE &HFDE0,&FIF1 


8) Codigo de caracteres 

Con esta rutina podemos ver el codigo 
decimal de cada tecla que pulsemos. 
10 CLS:KEY OFF: SCREEN 0:CO- 
LOR 11,1,1 

20 A$=INKEY$:IF A$=”” THEN20 

30 FOR 1=0 TO 255 

40 IF A$=CHRS(I) THEN PRINT 

“El CODIGO DECIMAL DE 

“;CHRS(I): PRINT “ES: “;I 

50 NEXT 

60 GOTO 20 

9) Interrupciones 

S i nos encontramos con algun progra- 
ma largo, para ahorrar tiempo corte- 
mos las interrupciones a fin de leer el 
teclado y, en consecuencia, la actuali- 
zation de la variable TIME. 

Estas funciones, si bien son realizadas 
con rapidez, tambien devoran nuestro 
tiempo. Con VDP(1)=208 se desacti- 
van las lecturas del teclado. AquI el 
sistema no recibe ninguna instruction 
desde el teclado, por lo tanto las tec las 
STOP o CONTROL/STOP no provo- 
caran ningun efecto. 

Para volver a activar las lecturas del 
teclado, hace falta introducir 
VDP(1)=204 

10) Grafico I: 

Este grafico nos puede resultar util 
para decorar caratuias de pantallas. 

■1 0AS=”s3m7800c4r8o3q 1 8al8b 1 8c 
4r8o3q 1 8a 1 8b 1 8c4r2r8o5c8c4 ,b8d4.c 
8q2f4" 

20 PLAY AS 
30 GOTO 30 

11) Grafic<> II: 

Para mejorar la presentation de los 
programas podcmos utilizar el si- 
guiente listado. 

10 SCREEN2: DEFINT A-Z: CO 
LOR 1,15,11 

20 FOR A=1 TO 255 STEP 19: FOR 
B=1 TO 191 STEP 11 
30 FOR C=A/2 TO B STEP 7: FOR 
D=B*2 TO 1 STEP 38 
40 LINE STEP (A,C)-(D,B),13 
50 LINE STEP (D,C)-(B,A),12 
60 LINE STEP (C,A)-(B,D),1 1 
70 LINE STEP (A,C)-(B,D),10 


80 NEXT 

90 NEXT 

100 NEXT 

110 NEXT 

120 ZS=INPUTS(1) 

12) Paleta 

BASE es el nombre de una instruc- 
cion poco usada. Se puede utilizar, 
entreotras funciones, paracrear nues- 
tra propia configuration de la memo- 
ria RAM de visualization. Por ejem- 
plo, la paleta de colores comienza en 
la direction 8 1 92 de la VRAM y tiene 
una longitud de 32 caracteres. Este 
programita nos permitira ver la panta- 
lla con varios caracteres de diferentes 
colores. 

10 COLOR 1,15 
20 SCREEN 1 

30 FOR N=8192 TO 8192*32 
40 VPOKE N,INT(RND(1)*255) 

50 NEXT N 

13) Caracteres 

Esta rutina nos permite modificar la 
definicion de los caracteres. De esta 
manera, podremos tener siempre car- 
gados en nuestra computadora los 
mas diversos disenos de letras y 
numeros. 

10 SCREEN0 

20 PRINT “Esto es una prueba” 

30 FOR T=1 TO 1300: NEXT 
40 FOR F=0 TO 7 
50 READN 

60 VPOKE(BASE(2)+(97*8+F)),N 
70 NEXT 

80 PRINT “Se cambio la definicion 
del caracter -a-” 

90 DATA 0,255,255,0,0,31,31,0 

14) 16K mas 

Esta rutina le da uso a 16K de memo- 
ria de la pagina 1 del slot 1 , que no se 
emplea y permanece oculta cuando se 
trabaja con BASIC. 

Una vez ejecutada, quedan definidas 
dos teclas: F3 y F8. 

Una funcion nos permite grabar el 
contenido de la memoria de video en 
modo texto; la otra lee dicho conteni- 
do y lo presenta en pantalla. A1 tipear 
F8 el cursor espera que ingresemos el 
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numero de pantalla que se ha de escri- 
bir o leer. En total se pueden almace- 
nar 16 pantallas (de 0 a 15). 

La rutina se puede usar con el drive 
conectado, ya que no produce ningu- 
na interferencia. Ademas, permite 
trabajar con dos o mas programas en 
BASIC simultaneamente, sin necesi- 
dad de acceder al disco o casete. 

10 WIDTH 38 
20 DEF USR8=51770! 

30 DEF USR9=51810! 

40 KEY3,”LEC=USR9(0)”+CHR$ 
(29)+CHR$(29) 

50 KEY 8,”ESC=USR8(0)”+CHR$ 
(29)+CHR$(29) 

110 FOR R=51750! TO 51839! 

120 READ D: POKE R,D: NEXT R 
130 NEW 

140 DATA64 ,68,72,76,80,84 ,88,92, 

96.100.104.108.112.116.120.124.0. 0.0.0 
150 DAT A 1 , 1 2,0,33 ,0,0,62,32,205, 

86.0. 33.38.202.58.248.247.133.111.30.0 
,86,33,0,0,1,192 

160 DATA3, 62, 84 ,21 1,168,205,89, 
0,62,80,2 11,1 68,201 ,33,38,202,58,248, 

247.133.1 1 1.126.103.46.0. 17.0.0.1.192, 

3.62.84.211.168.205.92.0. 62.80.211, 
168,201 

15) MuItiplicacion 

Con este program itapodremos ver las 

tablas de multiplicacion 

10CLS 

20 FOR K=10 TO 20 
30 CLS 

40 FOR 1=1 TO 20 
50 J=K*I 

60 PRINT K;” x “;I;” = “;J 

70 FOR D=1 TO 100 

80 NEXT D 

90 NEXT I 

100 FOR A=1 TO 400 

110 NEXT A 

120 NEXT K 

16) Sprite sin sprite 

Con el siguiente listado mostramos 
otro camino para que los programa- 
dores puedan manejar sprites. En la 
linea 50, el valor 195 define la forma 
del caracter que se va a mover luego 
como un sprite. Este valor puede ser 
modificado para cambiar su forma. 


En tanto la variable F define cual es el 
byte que sera definido. Para definir 
todo un caracter es necesario utilizar 8 
bytes, de ahf el bucle “FOR F=A TO 
A+7” 

El sprite definido esta en las 8 prime- 
ras posiciones de la tabla de diseno de 
sprites (BASE 9). 

Para correr el sprite modifiquemos las 
dos primeras posiciones de la tabla de 
atributos de sprites (BASE 8). Con la 
primera posicion se consigue variar la 
coordenada “X” del sprite, mientras 
que la segunda varia la coordenada 

«Y” 

10 SCREEN 1 
20 KEY OFF 
30 A=BASE(9) 

40 FOR F=A TO A+7 
50 VPOKE F,195 
60 NEXT 
70 S=BASE(8) 

80 FOR 1=0 TO 200 
90 VPOKE S,I 
100 VPOKE S+l, I 
110 NEXT 
120 GOTO 80 

17)Redefiniendo teclas 

Al comenzar a manejar nuestra MSX, 
las teclas de funcion se encuentran 
definidas con funciones como RUN, 
COLOR, LIST, etcetera . Con este 
listadito redefiniremos las funciones 
que les asignamos a dichas teclas. Las 
nuevas funciones seran: 

Fl=movera el curso siguiente. 
F3=movera el cursor al ultimo carac- 
ter de la linea actual. 

F4=borra la linea actual. 

F5=borra el caracter siguiente al cur- 
sor. 

F6=genera un “bip”. 

F7=borra el caracter anterior al cur- 
sor. 

F8=mueve el cursor a la proxima 
tabulae ion horizontal, borrando por 
donde paso. 

F9=borra la pantalla y el cursor se 
coloca en el angulo superior izquier- 
do. 

F10=borra el caracter donde esta el 
cursor. 

Estas definiciones son muy utiles 


cuando nos encontramos editando 
programas. 

10 CLS 

20 FOR F=1 TO 10 
30 READ A 
40 KEY F,CHR$(A) 

50 NEXT 

60 DATA 2,6,14,21,5,7,8,9,12,127 

18) Caracteres invertidos 

Este programa convierte todos los 
carcteres en efecto invertido. Funcio- 
na unicamente mientras no pasemos 
del modo de pantalla 1 a cualquier 
otro: 

10 SCREEN 1 
20 CLS 

30 FOR F=0 TO 2048 
40 IF F=256 THEN F=264 
50 D$ =”00000000" 
60AS=RIGHTS(DS+BI N $(VPEEK(F», 
8 ) 

70 FOR B=1 10'NEXT B 
120G$=V$(1)+V$(2)+V$(3)+VS(4)+ 
V $(5)+ V$(6)+ V S(7)+ V$(8) 

130 VPOKE F,VAL(“ &b”+GS) 

140 NEXT F 

19) RotuIos 

Con esta pequena rutina podemos 
darnos cuenta de la utilidad de la 
sentencia MIDS . Hace que un rotulo 
se desplace de derecha a izquiertruc- 
ciones de los programas. 

10 CLS 
20 KEY OFF 

30 SCREEN 0: WIDTH 40 
40 AS =”ESTO LO PUEDES IN- 
CORPOR AR A TUS PROGRAMAS 
- LOAD MSX" 

60 LOCATE 0,10 
70 PRINT MID$(A$,B,40) 

80 FOR F=1 TO 30: NEXT 
90 B=B+1 

100 IF B=43 THEN B=1 
110 GOTO 60 

20) Efecto 

Vemos con este listado un bonito 
efecto de pantalla, con lineas de dife- 
rentes colores. Los puntos aleatorios 
de las rayas se definen en las lineas 
40,50,60 y 70 
10 SCREEN 2 



20 A=1 

30 FOR T=1 TO 50000! 

40 X=INT(RND(1)*255) 

50 Z=INT(RND(1)*255) 

60 C=INT(RND(1)* 190) 

70 S=INT(RND(1)* 190) 

80 LINE (X,C)-(Z,S),A 
90 A=A+1 

100 IF A=16 THEN A=1 
110 NEXT T 

21) Enfilar y encolumnar 

Esta rutina permite numerar en los 
margenes izquierdo e inferior de la 
pantalla del modo texto 0 las filas y 
columnas en que puede dividirse la 
pantalla normalmcnte 
10 SCREEN 0: WIDTH 37 
20 CLS : KEY ON 
30 FOR F=0 TO 23 
40 VPOKEF*40,VAL(MIDS(STR$ 
(F),LEN(STR$(F)),l))+48 
50 NEXT F 
60 FOR C=0 TO 39 

70VPOKE920+C,VAL(MID$(STRS 

(C) ,LEN(STRS(C)), 1 ))+48 
80 NEXT C 

22) Proteccion: 

Para proteger los programas de los 
piratas tengamos en cuenta los si- 
guientes POKES: 

POKE 65297,195 
POKE 65298,0 
POKE 65299,0 

23) Nombres I 

Con este listado podremos averiguar 


el nombre del ultimo programa que 

hemos cargado 

10 FOR 1=63600! TO 63607! 

20 N=PEEK(I) 

30 PRINT CHRS(N) 

40 NEXT I . 

24) Nombres II: 

Si queremos saber el nombre del ulti- 
mo programa que hemos grabado, 
probemos con el siguiente listado. 

10 FOR 1=63590! TO 63596! 

20 N=PEEK 0) 

30 PRINT CHRS (N) 

40 NEXT 1 

25) Ventana 

Es sabido que la pantalla tienc 23 
Imeas.' Pero esta cantidad podemos 
cambiarla facilmente con la senten- 
cia: POKE 62385,N donde N es la 
cantidad de lfneas que tendra de largo 
la pantalla. 

26) CLS 

Para borrar la pantalla (CLS) de una 
manera diferente podemos ingresar la 
siguiente sentencia. 
DEFUSR=&HC3 
A=USR (0) 

27) Efecto luz 

Con esta rutina podemos cambiar el 
estado de la luz de la tecla CAPS. 
OUT 170,103 apaga la luz y OUT 
1 70,7 la enciende. Pero esto no cam- 


bia el modo de escritura, solo el esta- 
do del led indicador. 

10 OUT 107,103 

20 A=A+9: FOR 1=1 TO A: NEXT 1: 
BEEP 

30 OUT 170,7 

40 E=E+20: FOR 1=1 TO E: NEXT I 

28) OFF-ON 

Para eliminar o escribir la ultima llnea 
de la pantalla con las teclas de fun- 
cion, el BASIC cuenta con las senten- 
cias KEY OFF, KEY ON, respectiva- 
mente. 

Otra forma es con: 

DEFUSR=&HCA : A=USR (0), que 
elimina la llnea y 

DEFUSR=&HCD : A=USR1(0) que 
la vuelve a escribir. 

29) FONT 

Con esta rutina se puede cambiar la 
definition de los caracteres. 

Para recuperarla, ingresemos: 
SCREEN 0 

10 FOR N=BASE (2)+8*33 TO 
(BASE(2)+8*64)+255 
20 PRINT “Revista K-64” 

30 VPOKE N,248 : NEXT N 

30) Bloqueo 

Para provocar un bloqueo intencional 
de la computadora utilicemos la si- 
guiente instruccion: 

POKE 64922, 195. 

Para recuperar el control de la maqui- 
na deberemos apagarla. 

31) Italic 

Esta rutina permite escribir en panta- 
lla con tipografla “italic”, al tiempo 
que mantiene la clasica tipografla de 
la computadora. 

Aseguremonos que la computadora 
esta en modo minusculas. 

Para escribir con letras “italic minus- 
culas” se debe presionar simultanea- 
mente GRAPH y la tecla deseada. 
Para lograr letras “italic mayusculas” 
se debe presionar simultaneamente 
CODE y la letra deseada. 

10 SCREEN 1 

20 FOR F=0 TO 93 

30 Q=8 : W=0 : E= 1 : READ M : FOR 




C=0 TO 7: VPOKE 
M*8+C,VPEEK((F+33)*8+C) /0 
40 IF W=1 THEN Q+Q/2 
50 SWAP WJE 
60 NEXT 
70 NEXT 
80 END 

90 DATA159, 185,191,155,152,225, 
5,135,235,231,233,243,23,242,29,9,172, 
171,1 86,239, 1 89,244^5 1 ,236,7, 1 83 ,6, 
134,241,166,167 

100DATA217.132, 151,141,139,140, 
148, 129,177,161,145, 179, 181230, 164, 162, 
163,131,147,137,150,iai49,136,138,160,133, 
130, 13224,238,187,196,17,188, 19920520, 
21,19,220,198,221,200,11,27 
110 DATA194,219,204, 24,210,18, 

1 92,26,207,28 ,25, 1 5,237 , 1 73 ,2 1 8,229 

32) Buscadora 
La sentencia 

10 DEFUSR=&HDF : A=USR(0) : 
MOTOR OFF 

busca programas grabados en cinta. 

33) Mayusculas I 

Con estarutina los programas se inde- 
pendizan del tipo de letras que ingrese 
el usuario, pues ya sean mayusculas o 
miniisculas, indistintamente, son 
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contrOladas en forma automatica, 
garantizando el ingreso en mayuscu- 
las. 

10 PRINT “Mensaje pidiendo ingre- 
so por teclado” 

20 LINE INPUT A$ 

30 FOR L=1 TOLEN (AS) 

40LETCOD= ASC (MID$(A$,L,1)) 

50 IF COD>=97 AND COD<=122 

THEN LET COD=COD-32 

60LETAUXS=AUXS+CHRS(COD) 

70 NEXT L 

80 LET A$=AUXS 

90 PRINT AS 

100 REM RETURN 

34) Mayusculas II 

En aquellos casos en que se necesite 
que tanto las entradas de datos por 
teclado como la salida por pantalla 
sea en mayusculas podemos emplear 
el siguiente poke. 

POKE 64683,255 fija las mayuscu- 
las. 

POKE 64683,0 retoma al modo nor- 
mal. 

35) Pantalla invisible I 

DEFUS R=63 : U=US R(0) desactiva 
la pantalla y no podemos ver lo que 


estamos escribiendo, a pesar de que el 
teclado sigue tomando nuestra infor- 
macion. Con SCREEN 0 volvemos a 
la normalidad. 

36) Pantalla invisible II 

DEFUSR=121: U=USR (0) tambien 
apaga la pantalla, pero en este caso sf 
escribimos “a degas”. 

Con DEFUSR=120:U=USR(0) vol- 
vemos a la normalidad sin que se 
borre lo que habiamos escrito. 

37) BEEP 

Para lograr un efecto similar al del 
comando BEEP tendremos que colo- 
car: DEFUSR=192:U=USR(0) 


38) Modos de pantalla 

Con DEFUSR= 106:U=USR(0) pasa- 
mos al modo de pantalla 1 . 

Con DEFUSR=108:U=USR(0) vol- 
vemos al modo de pantalla 0. 

39) Nada se pierde 
Supongamos que tenemos un progra- 
ma en la memoria y luego lo borra- 
mos, ya sea con el clasico NEW o con 
la rutina de RESET (DEFUSR=0: 
PRINT USR(0)). 

Ahora supongamos que luego de“bo- 
rrarlo” queremos recuperarlo. Lo 
conseguiremos ingresando las si- 
guientes sentencias en este orden: 
POKE 32768,0 
POKE 32769,255 
POKE 32770,255 
LIST 
1 REM 

SAVE“CAS:NAME” 

40) Direcciones 

En las direcciones 64586 y 64587 se 
almacena el valor del comicnzo del 
area del sistema. Esta se calcula con 
PRINIPEEK(64586)+256*PEEK(64587). 
En las direcciones 64584 y 64585 se 
almacena el valor del comienzo de la 
RAM que usa el BASIC. Se calcula 
por el mismo procedimiento que la 
anterior. En las direcciones 64670 y 
6467 1 se guarda el valor de la variable 
TIME. Se calcula de la misma forma. 
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EXPLORADOR DE 
CABEZALES 



Autor: Patricio G. Exposito 
Tipo: Utilitario 
Computadora: MSX 


n 

esde el surgimiento de la nor- 
ma MSX ya ha pasado bastante tiem- 
po y cada dia son mas los usuarios de 
estas computadoras que poseen una 
unidad de discos. Cuando se encaran 
trabajos de cierta seriedad hay dos 
ventajas por las que conviene pagar la 
diferencia entre la disquetera y la 
unidad de casete: velocidad y seguri- 
dad. 

Sin embargo, no son pocos los usua- 
rios que siguen usando su computa- 
dora en forma “casera” y, para mu- 
chos de ellos, no se justifica pagar el 
precio de la disquetera. 

Un problema que se les suele presen- 
tar es que muchos utilitarios estan 


hechos exclusivamente para ser usa- 
dos con disquetera, o bien no pueden 
seraprovechadosal cienporcientode 
su capacidad si vienen en casete. 

El utilitario que presentamos aqui 
rompe la regia, ya que esta hecho para 
los “sufridos” usuarios de casetes. 

El programa basicamente puede ha- 
cer cuatro cosas: explorar, dar infor- 
mation de la unidad de cinta, leer un 
archivo y grabar un archivo. 

La exploracion, a su vez, se divide en 
lectura y busqueda. 


La information de la unidad de cinta 
puede ser dada por pantalla o impre- 
sora, a requerimiento del usuario. 
Consta de listados de programas, in- 
formacion del programa, busqueda 
del mismo mas una option adicional 
de borrar datos. 

Este programa, por su extension y 
utilidad, seguramente sera muy bien- 
venido por la numerosa grey de 
MSX. 


K> KEY i ,"DEFUSR=0;A=USR<» 

20 ' 

30 'EXPLORADOR DE CINTAS 
40 ' 

50 CLEAR 1 000 , &HD9FF 
60 ON STOP GOSUB 1400 
70 SCREENO: WIDTH 40: PRINT" EXF 
L.ORADOR DE CABECERAS PATOSOFT" 

80 DIM TP* (4) , PR* < 100) , TP ( 100) , I 
N < 100) , F I <100) , E J < 1 00 ) 

90 TP* < 1 ) * " BLO AD " s TP* < 2 ) = " LOAD " : 
TP* < 3 ) = " CLOAD " 

100 FOR T=$<HDAOO TO &HDA44: READ 

A* : POKE T , VAL < " &H " + A* ) : S=S+VAL < " 

&H"+A*) : NEXT : DEFUSR-&HDAOO 

110 IF S— 8966 THEN PRINT "ERROR 

EN DAT AS" : STOP 

120 KEY OFF 

130 'MENU 

140 GOSUB 970 

150 PRINT "MENU DE OPCIONES" 

155 PRINT "* -> 


160 X=30: Y=10: GOSUB 1060 


170 LOCATE 
AR" 

5,10: PRINT " 

1 

EXPLOR 

180 LOCATE 
AC ION U. C. 

5,12: PRINT " 

2 

INFORM 

190 LOCATE 
RCHIVO" 

5, 14: PRINT " 

3 

LEER A 

200 LOCATE 
ARCHIVO" 

5,16: PR I NT " 

4 

SALVAR 

210 LOCATE 5, 18: PRINT 
220 N0=5: GOSUB 1210 

5 

FIN" 


230 ON OP GOSUB 270,560,1440,147 
0 

240 IF OP-5 THEN 1?0 
250 KEY ON: CLS: END 
260 ' 

270 'EXF'LORA 
280 ' 

290 GOSUB 970: PRINT "EXPLORACION 
"-.LOCATE ,8 

300 X=30:Y=6: GOSUB 1060 
310 LOCATE 6, 10: PRINT "1 LEE" 

320 LOCATE 6,12:PRINT "2 BUSCA" 


330 LOCATE 6, 14: PRINT "3 SAL I DA" 
340 N0=3: GOSUB 1210 
350' IF 0P=3 THEN OP-O: RETURN 
360 N*="":IF OF -2 THEN GOSUB 131 
0 

370 CLS: PRINT"PLAY" : PRINT " " 

380 IF NP=100 THEN BEEP: PR I NT "M 
EMORIA LLENA": MOTOR OFF: GOSUB 12 
70: RETURN 

390 A*=USR ( STR I NG* < 20 , 0 ) > 

400 IF ASC(A*>=0 THEN 390 
410 T=ASC(A*> 

420 IF T=S<HD THEN MOTOR OFF : RETU 
RN 

430 NP=NP4 1 : TP < NP ) =0 
440 IF T=&HDO THEN TP (NP) -1 
450 IF T-fcHEA THEN TP(NP)=2 
460 IF T s =8<HD3 THEN TP (NP) =3 
470 PR* <NP)=MID^<A^,2,6> 

480 I N < NP ) = A3C (MI D* .< A* ,8,1) ) 4ASC 
(MID* (A* ,9,1) ) *256 
490 FI ( NP ) = ASC < M I D* < A* ,10,1) ) +AS 
C < M I D* < A* .11,1)) f-256 „ 
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500 EJ ( NP > =ASC ( M I D$ ( A* , 1 2 , 1 ) ) +AS 

T T s PR I NT " > " 

1320 

GOSUB 970 SPRINT "BUSCA PR." 

C <MID* <A*, 13, 1 ) ) *256 

890 LOCATE 2, 10: PRINT "CARGA: "TP 

1330 

X=17:Y=2: GOSUB 1060 

510 PRINT "FOUND: "PR* <NP) " "T 

* (TP <P) ) 

1 340 

LOCATE 12, 10 s PRINT "NOMBRE: 

P* ( TP < NP ) ) 

900 IF TP (P) —1 GOTO 950 


":N*=" " 

520 IF NP* 1 00 GOTO 380 

910 LOCATE 2 , 1 2 : F‘R I NT "DIR: I 

1350 

FOR T=1 TO 6 : LOCATE 19+T,10 

530 IF N*OPR*<NP> GOTO 390 

&H"HEX$<IN<P> > " “ I N < P ) 

1360 

A*== I NPUT* < 1 ) 

540 PRINT "HALLADO": MOTOR OFF: GO 

920 LOCATE 6 : PRINT "F &H"HEX 

1370 

IF ASC <A*> <32 THEN 1360 

SUB 1270 

t(FI(P))" "FI (P) 

1380 

PRINT A*s N*=N*+A*: NEXT 

550 RETURN 

930 LOCATE 6 : PRINT "E &H"HEX 

1390 

RETURN 

560 ' INFORMACIGN ULTIMA CINTA 

* < E J < P > > " "EJ <P) 

1400 

RETURN 150 

570 GOSUB 970: PRINT "INFORMACIGN 

940 PR I NT: PR I NT" M. 0.:"FIX<<FI 

1410 

DAT A 1 3 , 1 A , 6F , 13, 1 A , 67 , E5 , L 

U.C. " 

<P> -IN <P) >71024) "Kb" 

D , El , 

0 , CD , E*4 , 0 , 4F" ,6,9, C5 , CD , E4 , 0 

580 X=39:Y= 10: GOSUB 1060 

950 GOSUB 1270 

,C1 ,B9,28,2,E1 

590 LOCATE 1,10: PRINT " 1 LI ST A 

960 RETURN 

1420 

DATA C9 , 1 0 , F4 , FE , DO , 28 , C , FE 

PROGRAM AS" 

970 ' DIBUJA CABECERA 

, EA , 28 , S , FE , D , 28 , 4 , FE , D3 , 20 , EC , E 

600 LOCATE 1,1 2: PR I NT "2 INFORM 

980 CLS 

1,77, 

23, CD, 37 

AC I ON PRQGRAMA" 

990 PRINT STRING* <39, 42) 

1430 

DATA DA , E5 , CD ,E1 , 0 , E 1 , 6 , 6 , E 

610 LOCATE 1,14: PRINT " 3 BUSCA 

1000 FOR T=0 TO 2 

5 , C5 , 

, CD ,E4 ,0 ,C1 ,E1 ,77,23, 10, F5,C 

PROGRAMA" 

1010 PRINT CHR* < 42 > SPACE* < 37 > CHR 

9 


620 LOCATE 1,1 6: PR I NT " 4 BORRAR 

* < 42 > 

1440 


DATOS" 

1020 NEXT T 

1441 

OPEN" c as : ar ch " FOR I NPUT AS# 1 

630 LOCATE 1,18:PRINT " 5 SAL I DA 

1030 PRINT STRING* <39,42) 

1442 

INPUT# 1 , NP 

•• 

1040 LOCATE 12,2 

1443 

F0RI=1 TO NP 

640 N0=5: GOSUB 1210 

1050 RETURN 

1444 

INPUT# 1 , PR* < I ) 

650 ON OP GOSUB 680,820,1110,118 

1060 'DIBUJA CU ADR ADO 

1445 

INPUT# 1 , TP* < ! P < I ) ) 

0 

1070 LOCATE 0,3: PRINT SPACE* <<38 

1446 

I NPUT# 1 , IN < I ) 

660 IF OP-5 GOTO 560 

-X) /2) STRING* <X , 45) 

1447 

INPIJT#1 , FI < I ) 

670 0P=0: RETURN 

1080 FOR T=0 TO Y: PR I NT SPACE* < < 

1448 

I NPUT# 1 ,EJ < I ) 

680 CLS: IF NP=0 THEN BEEP: PRINT 

38- X ) /2) CHR* < 124) SPACE* < X-2) CHR* 

1449 

NEXT 

"NO HAY PROGRAMAS EN MEMORI A" : GO 

<124): NEXT T 

1450 

CLOSE 

TO 800 

1090 PRINT SPACE* < <38-X ) /2) STRIN 

1460 

RETURN 

690 PRINT" (I)mpresora o <P)antal 

G* < X , 45) 

1470 

* 

la?" 

1100 RETURN 

1471 

OPEN " c as s ar ch " FOROUTPLJT AS# 1 

700 J*= INKEY* 

1110 GOSUB 1310 

1472 

PR I NT# 1 , NP 

710 IFJ*<>"I"ANDJ*<>"i "ANDJ*<>"p 

1120 LOCATE 0, 15: PRINT "NO HALLA 

1473 

FOR 1=1 TO NP 

" ANDJ*< >"P"THEN700 

DO": LOCATE 0,15 

1474 

PR I NT # 1 , PR* < I > 

720 IFJ*="i "ORJ*=" I "THENG0SUB150 

1130 FOR T=1 TO NP 

1475 

PR I NT# 1 , TP* (TP < I ) > 

0 

1140 IF PR* <T) =N* THEN PRINT "PR 

1476 

PR I NT# 1 , IN<I> 

730 CLS 

OG. NO. : "T 

1477 

PRINT#1 ,FI < I ) 

739 PRINT "PROG. NOMBRE CARGA": 

1150 NEXT T: PRINT 

1478 

PR I NT# 1 ,EJ < I ) 

PRINT 

1160 GOSUB 1270 

1479 

NEXT 

740 FOR T=1 TO NP 

1170 RETURN 

1480 

CLOSE 

760 LOCATED, T+2: PR I NTT 

1180 LOCATE 17, 16: PRINT " CSEGURO 

1490 

RETURN 

770 L0CATE6 , T +2 : PR I NTPR* ( T ) 

91 *. 

5 

1499 

' impresora 

780 LOCATE 14 , T+2: PRINTTP* <TP <T) ) 

1190 A*= INPUT* < 1 ) : IF A*="S" OR A 

1500 

FOR T=1 TO NP 

790 NEXt T 

*="s" THEN NP=0 

1510 

LF'R I NT "PROG. NOMBRE CARGA 

800 GOSUB 1270 

1200 RETURN 

D. INC. D.FIN. D.EJC. MEM. REQ. " s 

810 RETURN 

1210 'SELECCION DE OPCION 

LPR I NT 

820 LOCATE 26, 12: PRINT "NO.: _" 

1220 LOCATE 8 ,22: PRINT" <SELECCIO 

1520 

LOCATED, T+ 2: LPRINTT 

830 LOCATE 30 , 12: P=VAL ( INPUTS < 1 ) 

NE OPCION < »" 

1530 

L0CATE7 , T+2 : L.PR I NTPR* < T ) 

) SPRINT USING"#" ; P 

1230 LOCATE 28,22 

1540 

LOCATE 1 5 , T+2 : LPR I NTTP* < TP < T 

840 LOCATE 31 , 12: P=P*10+VAL (INPU 

1240 QP= V AL < I NPUT * < 1 ) ) : PR I NT US I 

) ) 


T* < 1 ) ) s PRINT USING"#" 5 P MOD 10 

NG"#" ; OP 

1550 

L.0CATE2 1 , T+2 : LPR 1 NT I N < T ) 

850 CLS: IF P=0 OR P>NP THEN BEEP 

1250 IF 0P«0 OR OP >N0 THEN 1230 

1560 

L0CATE28 , T+2 : LPR I NTF I < T > 

SPRINT " PROG . I NE X I STENTE " s GOSUB 

1260 RETURN 

1570 

LOCATE 35 , T+2 : LPR I NTEJ < T ) 

1270: RETURN 

1270 'ESPERA TECLA 

1580 

L0CATE42 , T+2 : LPR I NTF I. X < < F I < 

860 GOSUB 970: PRINT "PROG. "P 

1280 LOCATE 12,22: PRINT "PULSE U 

T)-IN<T>> 71024) "kb." 

870 LOCATE 2,8: PRINT "TITULO: "P 

NA TECLA" 

1590 

NEXT T 

R *<P>" C"; 

880 FOR T=1 TO 6 : PRINT HEX*(ASC< 
MID*<PR*<P) , T , 1 ) ) ) SPACED < 1 ) ; s NEX 

1290 IF INKEY*=" " THEN 1290 

1300 RETURN 

1310 'ESPERA TITULO 

1600 

RETURN 



Lo que vendra: opinan los visionarios. 

Byte elige los mejores productos para PC de 1988. 

Bandidos de datos: virus, robo y destruccion accidental son todos enemigos 
peligrosos cuando Began a los datos de una red. 



HAUNTED HOUSE 


Estamos en una casa embrujada y 
debemos hallar la salida. Para ello 
tendremos que sortear toda clase de 
personajes dignos de una galena del 
terror: cerebros, esqueletos, fantas- 
mas, pisos que se derrumban, goteras 
con dcido, etcetera. 
Nuevamente,Eurosoft, haciendo gala 
de un amplio conocimiento de las 
capacidades graficas y de sonido de la 
norma, obtiene unos resultados muy 
interesantes. Por ejemplo, el estado 
de nuestro personaje se indica con un 
esqueleto cuyo corazon (muy bien lo- 
grado) late y , a medida que nos hieren, 
va cambiando el color y la velocidad 
de los latidos. Si nos matan, la boca de 
la calavera se abre (presumiblemente 
dice “jAy!”). 

Aquellos entusiastas de los juegos de 
aventuras en laberintos, como “Ma- 
nic Miner “ o “Misterio en el Nilo” 
estaran de parabienes con este, ya que 
para resolver cada pantalla se debe 
demostrar ingenio y velocidad. 

En algunos casos un salto bastara para 
lograr “zafar”, pero en otros debemos 
coordinar nuestro movimiento con el 
del monstruo de tumo (cuyo simple 
contacto es mortal). 

Los controles son sencillos: con los 
cursores movemos nuestro personaje 
y vamos recogiendo Haves, fuentes de 
poder, cruces (para repeler fantas- 
mas), rosarios y demas implementos 
que nos permitiran luchar contra las 
fuerzas del mal que controlan la casa. 
Tiene todos los ingredientes que 
hardn las delicias de los “aventurama- 
niacos”. (Distribuyen: Red Point / 
Real Time) 

BLOW UP 


El amigo Joe Kowalski debe cumplir 
una mision peligrosa: recorrer las 
galenas subterraneas para solucionar 
un problema en el tendido del gas de 
la zona. 

Para ello debera excavar sus propios 


caminos, enfrentarse a enemigos y 
seguir avanzando hasta llegar al des- 
tino. 

Aquellos memoriosos de la norma 


veran que “Blow Up” es una version 
muy sofisticada del conocido “Boul- 
der Dash”, con sus galenas, rocas que 
se deslizan y pueden aplastamos, 
algunas zonas con gas “lentificante”, 
que nos hacen avanzar a paso tortuga, 
etcetera. 

Es un juego muy interesante y que 
realmente atrapa, pues lograr veneer 
los obstaculos no es nada facil. 

La calidad grafica y los efectos de 
sonido son de primer nivel y estan 
acordes con el resto de los juegos 
pertenecientes a la lfnea de Eurosoft. 
(Distribuye: Real Time) 

TETRIS 


Microsoft pone a nuestro alcance este 
programa largamente esperado por 
los amantes de los juegos de ingenio. 
A nuestro pais llego primero como un 
programa de PC y se genero inmedia- 
tamente el clan de los “tetrismania- 
cos”. 

A simple vista, el juego no promete 
mucho: piezas geometricas formadas 
al azar con 4 cuadrados llamados te- 
trominos (de alii el nombre del pro- 
grama) caen en cualquier position. 


Nosotros debemos ubicar estas piezas 
en un contenedor a medida que bajan. 
Si logramos completar una linea de 
cuadrados, el conjunto desciende una 


linea y nos libera espacio en el conte- 
nedor. Gana quien mantiene mas 
tiempoenfuncionamiento elsistema. 
Las piezas se manejan rotandolas y 
movicndolas horizontalmente. El 
puntaje se otorga en funcion de tres 
factores: el nivel corriente, la veloci- 
dad para acomodar las piezas y si 
espiamos la pieza siguiente. 
Seeligeel nivel al comenzar el juego. 
Luego, el nivel aumenta cada vez que 
eliminamos 10 filas; pero si, por 
ejemplo, se comenzo en el nivel 3, se 
permanecera en ese nivel hasta que se 
eliminen 30 filas. 

Se puede mejorar el puntaje dejando 
caer instantaneamente las piezas tan 
pronto como se las tenga alineadas. 
Este juego fue desarrollado en la 
Union Sovietica por Viktor Gerasi- 
mov y Andrei Pajitnov. La primera 
version para PC estaba escrita en 
Turbo Pascal 4.0. Fue traducida al 
ingles (lastima, hubiera sido lindo 
verlo escrito en ruso), por David 
Howorth. 

Dicha version es de dominio publico 
y no puede ser vendida comercial- 
mente. Solo puede incluirse en BBS ’s 
con un archivo de explicaciones. 






Las distintas opciones disponibles 
son: 

D - Escribe en la agenda diaria (el 
texto del taco) 

T - Agenda telefonica (muestra agru- 
pado por letra) 

P - Seleccionar el mes que se mostrara 
(con calcndario perpetuo) 

G - Genera una agenda anual 


El archivo de explicaciones rezaba el 
siguiente mensaje: 

Si usted encuentra este juego intere- 
sante y lo utiliza, rogamos enviar 20 
rublos a: 

Viktor Gerasimov 
Gorki Av. 212 F 4 
Moscow 
Soviet Union 

^Alguien sabe a cuantos australes 
equivale un rublo? 

Rubios aparte, la version de MSX es 
de primer nivel. Tiene un buen acom- 
panamiento musical, los colores de 
las piezas estan bien definidos y se 
nos muestra la sumatoria de las piezas 
colocadas, el estado, el nivel del juga- 
dor y cuantas filas completamos. 
Los comandos son algo extranos, 
tan to para juegos MSX en general (no 
se usan los cursores) y como para la 
version PC (las teclas son diferentes a 
dicha version) . 

Como conclusion decimos que esta 
version no defraudara a los ya inicia- 
dos. A los principiantes les sugeri- 
mos jugar un par de minutos. Si a las 
tres horas de juego se percatan de que 
siguen jugando, no digan que no les 
advertimos... (Distribuye: Real 
Time) 

PORTFOLIO- AGENDA 
PERSONAL 

Basandose en los utilitarios para 


M S X 2 
tales 
como el 
Philips 
Home 
Office o 
el Philips 
Ease, 
surge 
esta version de un paquete de agenda 
personal, telefonica y calculadora 
para MSX1. 

Lo que se nos prcsenta en pantalla es 
la imagen del popular “taco” de ofici- 
na, en donde generalmente se puede 
ver el calendario, la fecha de hoy y un 
espacio en donde se hacen anotacio- 
nes y se apuntan las citas. El funcio- 
namicnto de este programa es muy si- 
milar al taco, con el agregado de la 
agenda telefonica, calendario perpe- 
tuo y calculadora. 

Los graficos del 
programa son 
muy ilustrativos, 
ya que cada op- 
cion esta simboli- 
zada con un fco- 
no, y se van pre- 
scnlando los dis- 
tintos mensajes 
con “ventanas” 
escritas en 64 co- 
lumnas (modo 
grafico, letra pe- 
quefia, como el 
Tasword). 


C - Option calculadora 

E - Permite buscar un texto dentro del 

taco. 

El uso es bastante sencillo, aunque 
algunas traducciones no estan muy de 
acuerdo con la Real Academia Es- 
panola (donde dice “Tecle una tecla” 
dcbe dccir “Pulse . ..”) En resumen, 
un utilitario interesante y practico 
para el hogar o la oficina modema. 
(Distribuye: Real Time) 


SOFT 

— LOS ESPECIALISTAS — 

MAS DE 10.000 TITULOS EN DISCO V CASSETTE 
PARA MSX1-MSX2-SPECTRUM-COMMODORE DESDE A 2 

EXCLUSIVO:MSX2 EN CASSETTE TURBO /<x 

TIEMPO DE CARGA PROM. 7MIN /cT 

LAS NOVEDADES ANTES QUE NADIE 

TODOS LOS UTILITARIOS PARA MASX1.2 
SPECTRUM- COMMODORE 
CASSETTE 1 2 JUEGOS MSX A 35 
CASSETTE 1 2 JUEGOS SPECTRUM A 35 
CASSETTE 20 JUEGOS COMMODORE A 35 
DISKETTES 3 1/2 - 5 1/2 - 8' - TODAS LAS 
MARCAS A LOS MEJORES PRECIOS 
COMPRA - VENTA DE MAQUINAS 
MEJORAMOS CUALQUIER OFERTA 


AV. SANTA FE 31 17 Loc. 1 - Tel.: 825-0977 
LUNESASABADO DE9A21HS. 






Para comunicarse con nosotros 
deben escribirnos a "Load MSX", 
Mejico 625 - 3 g piso (1097) 
Capital Federal. 



LECTOR CON 
PROBlEMAS 

Les quiero hacer conocer 
una inquietud personal 
con el fin de que me pro- 
pongan una solucion den- 
tro de sus posibilidades. 
Soy lector de MSX desde 
junio de 1987 y poseo una 
MSX2, con varios perife- 
ricos. 

Recientemente compre el 
software de SUELDOS Y 
JORNALES producido 
por ISM (Informatica 
San Martin S.A.) que vie- 
ne en disquete y con un 
cartucho Have. 

A1 aprender el uso del 
programa comprobe que 
el mismo liquida e impri- 
me los distintos items con 
milesimas de austral, sin 
poder cambiarse a cente- 
simas o decimas, es decir, 
esto no es modificable por 
el usuario. 

Ante este problema me 
dirigi al comercio donde 
adquiri el programa. Alii 
me dijeron que las milesi- 
mas no tienen importan- 
cia. Yo pienso lo contra- 
rio ya que una contabili- 
dad que se registre con 
centesimas de austral no 
puede mezclarse una vez 
al mes con cifras que lie- 
van milesimas. Ademas, 
en un futuro no muy leja- 
no probablemente no se 
van a utilizar mas las 
centenas ni las decenas de 
austral. 

Tambien me dijeron que 
esas son las desventaja 
del “software enlatado” y 
que ellos no pueden hacer 
nada,luego me propusie- 
ron que “yo” consultara a 
“su” proveedor. 


Al consultar al distribui- 
dor me comunicaron que 
ya no representaban mas 
a ISM y que “perdieron el 
rastro” de dicha empresa 
porque se cambio de 
domicilio. Sin embargo, 
me prometieron intentar 
conseguir el nuevo domi- 
cilio y telefonearme. 

Me pregunto si LOAD 
MSX puede proponerme 
algun tipo de solucion. No 
creo que un soft que vale 
110 dolares tenga un 
tiempo de vida tan limita- 
do y sin niguna garantia. 
El problema que se plan- 
tea debio ser previsto por 
los disenadores ya que 
nuestro pais se caracteri- 
za por su elevada infla- 
cion. 

Lamento que mi primera 
carta a la revista sea por 
este motivo, pero prome- 
to escribirles nuevamen- 
te para dilucidar inquie- 
tudes que tengo sobre 
diversos temas informa- 
ticos. 


Damian R. Castano 
San Miguel de Tucuman 


LOAD MSX 


Lamentablemente no te 
podemos ayudar a resolver 


el problema, ya que no 
podemos “meter mano” 
dentro del soft enlatado. 
S in embargo publicamos tu 
carta para advertir a nues- 
tros lectores sobre los pro- 
blemas que enfrentas y que 
no les ocurra lo mismo. 


PREGUNTABOOLEANA 


Quisiera que me infor- 
men sobre los siguientes 
terminos y conceptos: 
logica de Boole, algorit- 
mo, network y CAD. Des- 
de ya, muchas gracias por 
sacarme de mi ignorancia 
computacional. 

Pablo Uberti 
San Fernando 


LOAD MSX 


La logica de Boole o bina- 
ria es el concepto primario 
en el disefio de computado- 
ras. Las reglas que rigen el 
comportamiento de . las 
compuertas de un circuito 
fueron desarrolladas por el 
matematico ingles George 
Boole, a mediados del siglo 
XIX. 

Algoritmo es el metodo 


para resolver un problema. 
Es un conjunto de opera- 
ciones que deben ejecutar- 
se en un orden especifico. 
Network o red es la trayec- 
toria de las comunicacio- 
nes entre terminales y 
computadoras, o entre 
computadoras. La red pue- 
de ser una mezcla de distin- 
tas formas de canales de 
comunicaciones. 
Finalmente, CAD son las 
siglas de* Computer Aided 
Design (Disefio asistido 
por computadora). Los sis- 
temas CAD se utilizan para 
disefiar una infinidad de 
productos industrials y de 
consumo. 


MSX2 


Tengo una MSX2 y perdi 
el manual de la computa- 
dora. Quisiera me cornu- 
nicaran donde puedo 
conseguir uno nuevo. De 
paso una pregunta: 
£cdmo puedo acceder a 
las herramientas que tie- 
ne la MSX2? 


Martin Cabanas 
Tristan Suarez 


LOAD MSX 


El manual lo podes conse- 
guir en cualquier Centro de 
Asistencia al usuario. 

En cuanto a las herramien- 
tas de la MSX2 hay que 
apretar, simultaneamente 
las teclas CTRL y SHIFT 
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PARA TODOS 


EL FUTURO 


BYTE AWARDS 

LO MEJOR PARA PC 


PROTECCION 
VIRUS, ROBO 
Y ACCIDENTE 


PC IBM COMPATIBLES - DREAN COMMODORE - MSX - SPECTRUM 






Computadora ^ 
Personal TPC-310 

Caracteristicas: 


M icroprocesador Z80 A - 3,58 M H z. 
128 KB de memoria principal. 

1 28 KB de memoria de video. 

48 KB de MSX-BASIC Extendido, 
Version 2.0. 

32 KB de compilador Turbo BASIC 
Inciuye programa en ROM con 
cuatro funciones de accesorios: 
calculadora, reloj, calendario y 
juegode quince. 

Almacenamiento permanente de 
parametros preferidos: modo de 
pantalla, color de fondo, senates 


auditivas, mensajes, etc., y 


password para control reservado de 
acceso. 

Teclado profesional ergonomico de 
73teclas. 

Nuevos modos graficos incluyendo 
texto de 80 columnas y resolucion 
de 512 x 212 pixels multicolor. 

Reloj con dos alarmas y calendario 
permanente con bateria de backup. 
Capacidad de sobreimpresion de 
imagenes .y digitalizacion de video. 
Grabacion de imagenes en diskette. 
Soportede RAM-Disk. 


Soporte de Light Pen. 

Conector para perifericos de 
digitalizacion de imagenes. 

Salida a TV PAL-N y NTSC con 
modulador incorporado. 

Salidas para impresora paralela, 
video compuesto y RGB analogico 
incorporadas. 

Totalmente compatible con 
software, accesorios y perifericos 
deMSXI. 


Conozca Talent MSX 2 Tlirbo. 

La ventaja de un equipo 
profesional de super-tecnologia. 

Y la simplicidad de una maquina 
de pensar domestica. 

Con abundante memoria. Un buen 
lenguaje basic incorporado. 
Amplias posibilidades de 
conexion a perifericos. 

Y mas. Por menos. 

Porque el futuro esta cerca. 
Tengalo ya. 






Turbo 




